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