以下程序的功能是产生10个0～1000之间的随机整数放入数组Arr中然后输出其中的最大值。请填空。Op

以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。

Option Base 1

Private Sub Form. Click()

Dim Arr(10) As Integer

Dim Max As Integer

Randomize

For I = 1 To 10

Arr(i) = Int (Rnd * 1000)

Next i

Max= ______

For i = 2 To 10

If______Then

Max = Arr(i)

End If

Next i

Print Max

End Sub

请帮忙给出正确答案和分析，谢谢！

参考答案

您可能感兴趣的试题

下面的程序的作用是利用随机函数产生10个100~300（不包含300）之间的随机整数，打印其中7

答案解析
下列程序的功能是：输入10个整数，逆序后输出。请在程序空白处填入适当语句使程序完成指定的功能。Pr

答案解析
以下程序的功能是调用函数fun计算m=1－2＋3－4＋…＋9－10，并输出结果，请填空。int fun（int n){ int m=0

答案解析
(8)以下程序的功能是:先将随机产生的10个不同的整数放入数组a中再将这10个数按升序方式输出。请

答案解析
下列程序的功能是计算1到1000之间所有偶数之和程序空白处应填写的语句是 A.i Mod 2=0B

答案解析
以下程序的功能是:输出100以内(不含100)能被3整除且个位数为4的所有整数请填空。main()inti;for(i=0;1<10;i++)j=(11)_;if((12)continue;print(\%d j);

答案解析

以下程序的功能是 产生10个0～1000之间的随机整数 放入数组Arr中 然后输出其中的最大值。请填空。Op