设有程序: Option Base 1 Pfivme Sub Command1_Click( ) D
设有程序: Option Base 1 Pfivme Sub Command1_Click( ) Dim arr1,Max as Integer arr1=Array(12,435,76,24,78,54,866,43) 【 】=arr1(1) For i=1 To 8 If arr1(i)>MaxThen【 】 Next i Print"最大值是:";Max End Sub 以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。请填空。
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:Max Max=arr1(i)
根据题意,先用Array函数为数组arr1赋值,然后令变量Max等于arr1(1),相当于给Max赋了一个初始值。在For循环中,进行8次循环,逐一遍历比较arr1(i)值与Max值的大小,如果arr1(i)>Max,则令Max值等于此时的arr1(i)值。通过这个过程,求出arr1数组中的最大元素。故第12空填:Max。根据上面的分析,第13空应该把arr1(i)赋给Max,故填:Max=arr1(i)。
相似问题
在软件生命周期的各个阶段都会产生一系列的文件 如手册 数据和程序等 它们总称为【 】。请帮忙给出正确
在软件生命周期的各个阶段都会产生一系列的文件,如手册、数据和程序等,它们总称为【 】。请帮忙给出正确答案和分析,谢谢!
下图是应用程序的窗体 要求用户选中复选框Check1后 文本框Text1中的文字以粗体显示 选中复选
下图是应用程序的窗体,要求用户选中复选框Check1后,文本框Text1中的文字以粗体显示,选中复选框Check2后,文本框Text1中的文字以斜体显示,单击“关闭
设有程序: Option Base 1 Private Sub Command1_Click() D
设有程序: Option Base 1 Private Sub Command1_Click() Dim arrl, Max As Integer arrl=Array(12, 435, 76, 24, 78, 54, 866, 43)
计时器事件之间的间隔通过【 】属性设置。请帮忙给出正确答案和分析 谢谢!
计时器事件之间的间隔通过【 】属性设置。请帮忙给出正确答案和分析,谢谢!
语句print'25+32=';25+32的输出结果是【 】。请帮忙给出正确答案和分析 谢谢!
语句print "25+32= ";25+32的输出结果是【 】。请帮忙给出正确答案和分析,谢谢!
