天堂网在线www中文丨性大毛片视频丨无码人妻一区、二区、三区免费视频丨欧洲肉欲k8播放毛片丨国产亚洲精品a久久777777

程序里寫的是自己用從小到大排序的。
如果要從大到小也很簡單，自己改一下比較指令就行。
管理員看見了，記的加精，程序寫有注釋，大家都能看懂。

感謝分享

冒泡程序

精華精華

精華精華

感謝分享，雖然沒看懂。

謝謝分享。。。。。。。。

程序思路就是相鄰數依次比較，選出最大數。
一重循環從99次比較到1次比較，依次減少，因每一次比較，最大數排在后面越來越多，到最后一次只有2個數據比較，
二重循環執行一重循環99次。每一次選出比較剩下的最大數。
大概就是這樣，看不明白的話，看看變址的應用，和FOR應用。

優秀的人到哪都優秀！

模擬了一下，有點牛逼。我再好好研究研究   

謝謝大佬

//冒泡排序算法
IF SM402 THEN
  wData[0]:=50;
  wData[1]:=41;
  wData[2]:=23;
  wData[3]:=1;
  wData[4]:=58;
  wData[5]:=77;
  wData[6]:=42;
  wData[7]:=3;
  wData[8]:=9;
  wData[9]:=99;
END_IF;

IF bLabel2 THEN
    FOR wi:=0 TO 9 BY 1 DO  
      // wj:=wi+1;
       FOR wj:=wi+1 TO 9 BY 1 DO
         IF wData[wi]>wData[wj] THEN
             wdata1:=wData[wi];
             wData[wi]:=wData[wj];
             wData[wj]:=wdata1;
         END_IF;
       END_FOR;
    END_FOR;
END_IF;