下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程序补充完整。 Private Sub Form_Click()   Dim an (10) As Integer   Dim max As Integer   R

admin2013-01-23  26

问题 下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程序补充完整。
   Private Sub Form_Click()
     Dim an (10) As Integer
     Dim max As Integer
     Randomize
     For i%=1 To 10
      an(i%)=  _______
     Next i%
     max=an(1)
     For i%=2 To 10
      if  _______  then
       max=an(i%)
      End If
     Next i%
     print max
     End Sub
   End Sub

选项

答案Int(Rnd*100) an(i%)>max

解析
转载请注明原文地址:https://jikaoti.com/ti/72O0FFFM
0

最新回复(0)