level 0
比如6个数从小到大：clsdim A (6)for I=1 to 5for J=I+1 to 6if A(I)>A(J) then swap A(I),A(J)next J,Iend从大到小把大于号改成小于号
2007年08月13日 15点08分
2
level 0
我刚学了不久`但没听懂``楼主有qb教程么``??有就说下``谢谢``
2008年04月15日 13点04分
4
level 1
不对，这不是冒泡法！这是快速法！！！一个一个的比，找到就调换，绝对的快速法！冒泡法是这样滴：cls 清屏dim a(6) 定义a单下表变量do 外层用一个do循环 p=0 p清零，p是标识符，标志有没有进行对换操作 for i=1to 5 内层是for循环，从第一个到倒数第二个 if a(i)
2008年05月16日 13点05分
5
