[单项选择题] 下面程序的功能是由随机函数产生100个在200~700之间的整数,然后找出最大者,并记下是第几个数,但程序不完整,请选择适当的内容在下划线处将程序补充完整。
Dim a(100)
For j=1 To 100
a(j)=Int(Rnd*501+200):Print a(j)
Next j : Print
p=1 : max= ______
For j=2 To 100
If a(j)>max Then max=a(j) : p=j
Next j
Print "The largest number is " ; max
Print "The position is"; p
End
A.0
B.a(1)
C.1.7E+38
D.1.7E-38