下列程序的功能是:找出给定的12个数中最大的一个数 然后输出这个数以及经在原来12 option B
下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及经在原来12 option Base 1 Private Sub Form_Click() Dim x x = Array(57,-9, 17,42, -31,46, 11, 8, 6, -4, 3,90) Max=1 For k=2 To 10 Step 1 If x(k) > x(Max) Then ______ End If Next k y=______ Print Max, y End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:Max=k x(Max)
在数组中查找多个数中最大的数的算法是:首先设变量Max为1,从第一个数组元素开始与x(Max)对比,如果数组元素大于x(Max),则Max记录该数组元素的下标,比较完后,Max记录了最大数的下标。所以第1个横线处,应填写Max=k,用Max记录较大数的下标;第2个横线处,用y来存储元素的最大值。
相似问题
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时 将图片加载到图片框中
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向
在菜单编辑器中建立了一个菜单 名为pmenu 用下面的语句可以把它作为弹出式菜单弹出 请填空。 Fo
在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。 Forml.【 】pmenu请帮忙给出正确答案和分析,谢谢!
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)” 直至“1/(2n+1)”小于10-4。
以下程序用于计算“1+1 3+1 5+…+1 (2n+1)”,直至“1 (2n+1)”小于10-4。阅读下面程序,请在【 】和【 】处填上正确内容。 Private Sub Command1_C
下列程序实现的功能是:当在窗体上单击时 从键盘上读入5个学生的学号 姓名 英语成绩并存入到文件d:/
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d: stu1 dat中,然后从文件中读出第3个人的学号、姓
以下程序用随机函数模拟掷骰子 统计掷50次骰子出现各点的次数。阅读该程序 并在【 】和【 】处填上正
以下程序用随机函数模拟掷骰子,统计掷50次骰子出现各点的次数。阅读该程序,并在【 】和【 】处填上正确的内容。 Private Sub Command1_ Click()
