设有如下程序 查找并输出该数组中的最小值 请在空白处填上合适的代码 将程序补充完整。 Option
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1=Array(12, 435, 76, -24, 78, 54, 866, 43) Min = arr1(l) For i=2 To 8 If arr1(i) < Min Then Next i Print "最小值是:"; Min End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:Min=arr1(i)
题目要求输出数组中的最小值,分析程序可知,本程序求数组最小值的算法是:假设最小的值是第一个数组元素,并把它存在Min变量中,然后从数组的第二个元素开始逐个与Min变量对比,如果有比Mim更小的数,则赋值给Min,这样对比到数组最后一个元素时,就能找到最小的元素,且它存储在Min变量中,因此最后只要输出Min变量值即可。
相似问题
列表框的List属性返回______。请帮忙给出正确答案和分析 谢谢!
列表框的List属性返回______。请帮忙给出正确答案和分析,谢谢!
数据是信息的符号表示 又称载体;信息是数据的【 】。请帮忙给出正确答案和分析 谢谢!
数据是信息的符号表示,又称载体;信息是数据的【 】。请帮忙给出正确答案和分析,谢谢!
执行下列语句后 输出结果为______。 s$='ABCDEFG' Print InStr(s$ '
执行下列语句后,输出结果为______。 s$= "ABCDEFG " Print InStr(s$, "efS ") Print LCase$(s$)请帮忙给出正确答案和分析,谢谢!
在窗体上画一个名称为Label1的标签和一个名称为list1的列表框。程序运行后 在列表框中添加若干
在窗体上画一个名称为Label1的标签和一个名称为list1的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签kabel1中显示
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后 Comma
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1
