设有程序: Option Base 1 Private Sub Command1_Click() D

大学专科 已帮助: 时间:2023-07-22 09:18:38

设有程序: 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 以上程序的功能是,用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。请填空。
请帮忙给出正确答案和分析,谢谢!

难度:⭐⭐⭐

题库:大学专科,电子信息,计算机类

标签:最大值,元素,程序

参考解答

用户头像

410***264

2023-07-22 09:18:38

正确答案:Max Max=arrl(i)
当定义变量Max以后,系统自动给其赋初值为0。将数组第一个元素值赋值给Max,再将它与其他各数组元素逐个进行比较。若某个元素值比Max大,就将其赋值给Max,从而保证Max中始终是最大的值。

上一篇 计时器事件之间的间隔通过【 】属性设置。请帮忙给出正确答案和分析 谢谢!

下一篇 下图是应用程序的窗体 要求用户选中复选框Check1后 文本框Text1中的文字以粗体显示 选中复选

相似问题