首页 > 计算机 > 计算机考试 正文

[填空题] 设有如下程序:Option Base 1 Pfivme Sub Command1_Click( ) Dim arr1 Dim Min As Integer,i As Integera

时间:2021-07-20 16:53:44 解答: 78 次

[填空题] 设有如下程序:Option Base 1 Pfivme Sub Command1_Click( ) Dim arr1 Dim Min As Integer,i As Integerarrl=Array(12,435,76,-24,78,54,866,43) Min= 【12】 For i=2 TO 8If arr1(i)<Min Then 【13】 Next i Print“最小值是:”;Min End Sub 以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的小值。请填空。

正确答案:

[12]srr1(0)

参考解析:

[13] Min=arr1(i) 此题的功能是计算数组中的最小值,首先,把数组的第一个元素给Nin,然后分别和剩下的元素进行比较,如果哪一个元素比Min小,就交换,把这个元素的值给Min,直到最后。所以[12]应该是把数组的第一个元素给Min,即Min=arrl(0)。[13]是把和 Min比较后较小的值赋给Min,所以为Min=arr1(i)。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-02 13:37:15

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-02 13:37:15

←请使用微信扫码支付