[填空题] 下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及经在原来12option Base 1Private Sub Form_Click()Dim x x =

[填空题] 下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及经在原来12 option Base 1 Private Sub Form_Click() Dim x x =

[填空题] 下列程序的功能是：找出给定的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来存储元素的最大值。