以下程序的功能是，产生10个0～1000的随机整数，放入数组Art中，然后输出其中的最大值。请填空。 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= （14) For i=

编写程序实现以下功能：从键盘输入10个整数，按由小到大的顺序输出这10个数 下面程序的功能是产生100个小于1000（不含1000) 的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请在[7]和[8]处把程序补充完整。 下列Visual Basic表达式中，能产生一个10到99之间（包括10和99）随机整数的是（）。 以下程序用宋输出20个在开区间（10，87)中的随机整数R，每行输出4个整数。请完善下列程序。 Private Sub Command1_Click（)For I = 1 To 10 R = 【9】 Print R； If I Mod 4=0 Then PrintNext I End Sub 以下（）表达式产生一个0~7之间（含0，7）的随机整数。 以下()表达式产生一个0~7之间(含0,7)的随机整数 下面程序的功能是产生10个小于100（不含100) 的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dim a（10) For i=1 To 10 a（i) =Int（[14] ) If [15] Then k=k+1 Print a（j) Next j Print Print k/10 End Sub 下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dim a（10) For j=1 To 10 a（i)=Int（【14】 ) If 【15】Then k=k+1 Print a（j) Next j Print Print k/10 End Sub 下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 SubPR（) Randomize Dim a（10) For j=1 To 10 a（i)=Int（（14) ) If （15) Then k=k+1 Print a（j) Next j Print Print k/10 Fnd Sub 下列程序为求Sn=a+aa+aaa+……+aa…a（n个a)，其中a为一个随机数产生的1～9（包括1、 9)中的一个正整数，n是一个随机数产生的5～10（包括5、10)中的一个正整数，请在空格处填入适当的内容，将程序补充完整。 Private Sub Form_CUCk（) Dima As Integer,n As Intege,S As Double，Sn As Double a=Fix（9*R 下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dim a For j=1 To 10 a（i)=Int（【 】 ) If 【 】Then k=k+1 Print a（j) Next j Print Print k/10 End Sub 编写一个每次随机生成 10个 0(包括) 到 100 之间的随机正整数 下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dima（10) Forj=1 To 10 a（i)=Int______ If a（j)Mod5=0 Then k=k+1 Printa（j) Nextj Print Printk/10 End Sub 下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dim a（10) For j=1 To 10a（i)=Int（[14] )If [15] Then k=k+1Print a（j) Next J Print Print k/10 End Suh 能够产生一个三位随机整数的函数表达式是（）。 （05-01）定义一个方法，产生一个100以内的随机整数 以下程序用来产生20个100以内的随机整数，并将其中的偶数在窗体上显示，请填空。 Randomize Fori=1 To 20 x= [5] If x/2= [6] Then PrintX End If Nexti INT（100*RND）产生的随机整数的闭区间是（）。 INT(100*RND(1))产生的随机整数的闭区间是 Int（100*Rnd（1))产生的随机整数的闭区间是（)。