下面程序的功能是由随机函数产生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

只要患者上吐下泻，就一定是急性胃肠炎