[填空题] 以下程序的功能是,产生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 10Arr(i) = Int (Rnd * 1000) Next iMax= ______For i = 2 To 10If______ Then Max = Arr(i)End If Next i Print Max End Sub
正确答案:Arr(1) Arr(i) > Max
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)