填空题

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