dim a(20)
for i=1 to 20
a(i)=int(rand(1)*900)+100
next i
for i=1 to 19
for j=i+1 to 20
if a(i)>a(j)
t=a(i)
a(i)=a(j)
a(j)=t
endif
next j
next i
for i=1 to 20
print a(i);
if i mod 10=0
print
endif
next i
end
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024