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

[填空题] 设有程序: Option Base 1 Private Sub Command1 Click() Dim arrl,Max as Integer arrl=Array(12,435,7

时间:2021-07-20 17:44:14 解答: 90 次

[填空题] 设有程序: Option Base 1 Private Sub Command1 Click() Dim arrl,Max as Integer arrl=Array(12,435,76,24,78,54,866,43) ______ =arrl(1) For i=1 To 8 If arrl(i)>Max Then_______ Next i Print“最大值是:”;Max End Sub 以上程序的功能是:用Atray函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。请填空。

正确答案:

Max

参考解析:

Max=arrl(i) 本题综合考查数组的初始赋值与For循环控制语句。根据题意,先用Array函数为数组arr1赋值,然后令变量Max等于arr1(1),相当于给Max赋了一个初始值。在For循环中,进行8次循环,逐一遍历比较arr1(i)值与Max值的大小,如果arr1(i)>Max,则令Max值等于此时的arr1(i)值。通过这个过程,求出arr1数组中的最大元素。故第12空填:Max。 根据上面的分析,第13空应该把arrl(i)赋给 Max,故填:Max=arrl(i)。

  • 相关题库

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

×

95元 29元

VIP截止日期:2025-01-01 14:53:43

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-01 14:53:43

←请使用微信扫码支付