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

点状加热的火焰矫形法主要用于（）的矫形。

A.薄板结构

B.厚板结构

C.收缩变形

D.弯曲变形