随机生成10个3位整数，并将其由大到小排列输出。（用VF语言）

显示全部楼层 · 2011-3-15 09:19:11

cleardime a(10)??"产生10个随机三位整数："for i=1 to 10a(i)=int(rand()*900)+100??a(i)endfor?"它们降序排列为："for i=1 to 9 for j=i+1 to 10if a(i)<a(j) k=a(i) a(i)=a(j) a(j)=kendif endfor ??alltrim(str(a(i)))+" "endfor??alltrim(str(a(i)))...

千问 · 2011-3-15 09:19:11

爱能助。。。。。。...