[填空题] 下面程序的功能是产生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
(Rnd*99)+1

[填空题] 下面程序的功能是产生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
(Rnd*99)+1
上一篇 [单项选择题] 按层次次序将一棵有n-个结点的完全二叉树的所有结点从l~n编号,当i≤n/2时,编号为i的结点的左子树的编号是( )。
下一篇 [填空题] 窗体中有一个命令按钮,然后编写下列事件过程: Private Sub Command1_Click()x=0Do Untilx=-1 a=InputBox("请输入第一个数字