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

[填空题] 设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1

时间:2021-07-20 19:30:31 解答: 200 次

[填空题] 设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 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(1) For i=2 To 8 If arr1(i)<Min Then______ Next i Print "最小值是:"; Min End Sub

正确答案:

Min=arrl(i)

参考解析:

题目要求输出数组中的最小值,分析程序可知,本程序求数组最小值的算法是,假设最小的值是第一个数组元素,并把它存在Min变量中,然后从数组的第二个元素开始逐个与Min变量对比,如果有比Min更小的数,则赋值给Min,这样对比到数组最后一个元素时,就能找到最小的元素,且它存储在Min变量中,因此最后只要输出Min变量值即可。

  • 相关题库

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

×

95元 29元

VIP截止日期:2024-12-31 02:50:25

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2024-12-31 02:50:25

←请使用微信扫码支付