万能百科  > 计算机   > 

[填空题] 设有如下程序:Option Base 1Private Sub Commandl Click()Dim arrlDim Min As Integer

2021-07-20   

[填空题] 设有如下程序:Option Base 1Private Sub Commandl Click()Dim arrlDim Min As Integer,i As Integerarrl=Array(12,435,76,-24,78,54,866,43)Min=()For i=2 To 8If arrl(i)<Min Then()NextPrint"最小值是:";MinEnd Sub以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。

正确答案:

arrl(1);Min=arrl(i)

参考解析:

[评析] 由于有Option Base 1语句,所以数组下标是从1开始。本题的功能是查找8个数中的最小值,首先使用Array语句给数组赋值,然后把第一个值赋值给最小值变量,及Min=arrl(1),然后从第二个数开始循环与最小值比较,如果比最小值小,则把这个值赋值给Min,即Min=arrl(i)。

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签