0 number = 1010 a = int(rnd * number)15 if a < 3 then 1020 b = int(rnd * a)25 if b < 2 then 2030 c = int(rnd * b)35 if c < 1 then 3040 d = int(rnd * c)50 print a;b;c;d注:number变量可以改
改第0行就行了!
randomize timer dim a(4) for i=1 to 4 a(i)=int(rnd(100)+1） next i for i=1 to 3 for j=i+1 to 4 if a(i)<a(j) then swap a(i),a(j) next j next i for i=1 to 4 ?a(i); next i RND 随机函数（0至1之间取值）SWAP 交换函数
