您所在位置：主题：变量数据如何实现从小到大排序啊！
洪荒落寞雪
[专家分：1500] 发布于 2005-09-22 00:18:00
如何把a,b,c,d,e,f,z 按从小到大排序啊
print " SSQXHCX "
do
randomize timer
Print "please input the ZHU SHU!"
input "n=";n
for i = 1 to n
let a = int (10*rnd)+1
let b = int (10*rnd)+1
let c = int (12*rnd)+12
let d = int (12*rnd)+12
let e= int (8*rnd)+25
let f = int (8*rnd)+25
let z = int (15*rnd)+1
print " ";a;" ";b;" ";c;" ";d;" ";e;" ";f;" ";z
next i
input "Do you continue? (Y/[N])"; hhlmx$
if hhlmx$ <> "y" and hhlmx$ <> "Y" then exit do
loop
end
print " SSQXHCX "
do
randomize timer
Print "please input the ZHU SHU!"
input "n=";n
for i = 1 to n
let a = int (10*rnd)+1
let b = int (10*rnd)+1
let c = int (12*rnd)+12
let d = int (12*rnd)+12
let e= int (8*rnd)+25
let f = int (8*rnd)+25
let z = int (15*rnd)+1
print " ";a;" ";b;" ";c;" ";d;" ";e;" ";f;" ";z
next i
input "Do you continue? (Y/[N])"; hhlmx$
if hhlmx$ <> "y" and hhlmx$ <> "Y" then exit do
loop
end
