[填空题] 下面程序的功能是产生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

Print k/10

End Suh