2. 计算机
  3. 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer 　　Randomi

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

admin2013-04-11  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
   　　max=an(1)
   　　For i%=2 to 10
   　　　　ifan(i%)＞max then
   　　　　　　max=an(i%)
   　　　　End If
   　　Next
   　　Print max
   End Sub
选项
答案Int(Rnd*1000)
解析
转载请注明原文地址:https://kaotiyun.com/show/2dhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)