利用随机函数产生50-100范围内的20个随机数,显示其中最大值,最小值和平均值

s=0
p=50
q=100
For i = 1 To 20
a=Int(Rnd*51+50)
Print a;
if a>=p then
p=a
end if
if a<=q then
q=a
end if
s=s+a
Next i
b=s/20
print "最大值是";p
print "最小值是";q
print "平均值是";b
end sub

将你的部分改了一下,加上你原来的应该行了

max=0
min=100
For i = 1 To 20
a=Int(Rnd*51+50)
if max<a then max=a
if min>a then min=a
s=s+a
Print a;
Next i
s就是总值 除以20 不就是平均值了~
max 最大值
min 最小值