下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。
SubPR()
　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
Fnd Sub

种植修复体在下列情况下必须采用螺钉固位的是（）。

A.植入体长轴不平行，难以形成共同就位道

B.修复空间的牙合龈高度不足，不能提供充分的粘结固位力

C.临近的剩余天然牙预后较差，在较短时间内可能拔除，螺钉固位可以完整取下种植桥作结构改造

D.植入体长轴偏向人工牙冠的唇（颊）侧，如果采用轴向螺钉固位，螺钉通道会影响人工牙的外观时

E.A+B+C