[填空题] 下面程序的功能是产生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 k/10
End Suh
正确答案：a(j) Mod 5=0
![[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR() Randomize Dim a(10)](http://www.mshxw.com/aiimages/31/481935.png "[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR() Randomize Dim a(10)")
[填空题] 下面程序的功能是产生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 k/10
End Suh
正确答案：a(j) Mod 5=0
名师互学网 版权所有 (c)2021-2022 ICP备案号：晋ICP备2021003244-6号
