仙居人家
我來了。
級別: 網(wǎng)絡(luò)英雄
精華主題: 2 篇
發(fā)帖數(shù)量: 737 個
工控威望: 5418 點
下載積分: 24604 分
在線時間: 1365(小時)
注冊時間: 2016-06-08
最后登錄: 2024-11-08
查看仙居人家的 主題 / 回貼
樓主  發(fā)表于: 2023-02-02 13:06
程序里寫的是自己用從小到大排序的。
如果要從大到小也很簡單，自己改一下比較指令就行。
管理員看見了，記的加精，程序?qū)懹凶⑨�，大家都能看懂�?div class="lpnpd7z" id="alert_tpc" style="color:gray;margin-top:30px">[ 此帖被仙居人家在2023-02-02 15:53重新編輯 ]
附件： 比較大小排序，從小到大排隊.zip (448 K) 下載次數(shù):2146
網(wǎng)站提示: 請不要用迅雷下載附件，容易出錯
本帖最近評分記錄：
  • 下載積分:+1(思考使人進步)
  • 下載積分:+5(加勒比海帶)
  • 下載積分:+1(天天向上學(xué)習(xí)) 感謝分享！
  • 下載積分:+5(jiangwei) 真誠感謝！
  • 下載積分:+5(langui) 熱心助人！
  • 下載積分:+1(智趣黃sir) 感謝分享！
  • 下載積分:+1(菜鳥至尊.) 感謝分享！
    • 永無止境 !@#$%^&*
    天下風(fēng)云出我輩，一入江湖歲月催。
    皇圖霸業(yè)談笑中，不勝人間一場醉。
    提劍跨騎揮鬼雨，白骨如山鳥驚飛。
    塵事如潮人如水，只嘆江湖幾人回。
    lan19910425
    級別: 工控俠客
    精華主題: 0
    發(fā)帖數(shù)量: 179 個
    工控威望: 2232 點
    下載積分: 36716 分
    在線時間: 306(小時)
    注冊時間: 2019-06-02
    最后登錄: 2024-11-12
    查看lan19910425的 主題 / 回貼
    1樓  發(fā)表于: 2023-02-02 13:07
    感謝分享
    tingfenghu
    級別: 工控俠客

    精華主題: 0
    發(fā)帖數(shù)量: 2845 個
    工控威望: 3617 點
    下載積分: 3517 分
    在線時間: 3799(小時)
    注冊時間: 2007-11-04
    最后登錄: 2024-11-12
    查看tingfenghu的 主題 / 回貼
    2樓  發(fā)表于: 2023-02-02 13:23
    冒泡程序
    二手PLC,觸摸屏，伺服驅(qū)動，各類氣動設(shè)備
    http://shop58129605.taobao.com/
    ymmfa
    不想大江大河，不想浪起潮落，只愿一灣小湖，靜待歲月安好。
    級別: 管理員

    精華主題: 8 篇
    發(fā)帖數(shù)量: 9661 個
    工控威望: 8546 點
    下載積分: 16705 分
    在線時間: 5321(小時)
    注冊時間: 2006-08-10
    最后登錄: 2024-11-12
    查看ymmfa的 主題 / 回貼
    3樓  發(fā)表于: 2023-02-02 15:32
    精華精華
    特別提醒大家：
    偶爾修改下自己的密碼，以防被盜
    不要在多個網(wǎng)站都用一樣賬號密碼
    偶爾還是要發(fā)發(fā)貼，回回貼，不要總潛水
    往事如風(fēng)
    科技改變制造
    級別: 網(wǎng)絡(luò)英雄

    精華主題: 0
    發(fā)帖數(shù)量: 11361 個
    工控威望: 18518 點
    下載積分: 12028 分
    在線時間: 2686(小時)
    注冊時間: 2013-01-31
    最后登錄: 2024-11-02
    查看往事如風(fēng)的 主題 / 回貼
    4樓  發(fā)表于: 2023-02-02 21:20
    精華精華
    三人行者必有我?guī)?，擇其善者而從之
    18662210331
    級別: 正式會員
    精華主題: 0
    發(fā)帖數(shù)量: 33 個
    工控威望: 89 點
    下載積分: 330 分
    在線時間: 13(小時)
    注冊時間: 2021-07-03
    最后登錄: 2024-01-02
    查看18662210331的 主題 / 回貼
    5樓  發(fā)表于: 2023-02-03 13:14
    感謝分享，雖然沒看懂。
    zhongliang
    學(xué)無止境
    級別: 工控俠客
    精華主題: 0
    發(fā)帖數(shù)量: 742 個
    工控威望: 2102 點
    下載積分: 3679 分
    在線時間: 581(小時)
    注冊時間: 2012-10-11
    最后登錄: 2024-11-12
    查看zhongliang的 主題 / 回貼
    6樓  發(fā)表于: 2023-02-03 14:13
    謝謝分享。。。。。。。。
    ****************************學(xué)海無涯****************************
    仙居人家
    我來了。
    級別: 網(wǎng)絡(luò)英雄
    精華主題: 2 篇
    發(fā)帖數(shù)量: 737 個
    工控威望: 5418 點
    下載積分: 24604 分
    在線時間: 1365(小時)
    注冊時間: 2016-06-08
    最后登錄: 2024-11-08
    查看仙居人家的 主題 / 回貼
    7樓  發(fā)表于: 2023-02-03 15:15
    程序思路就是相鄰數(shù)依次比較，選出最大數(shù)。
    一重循環(huán)從99次比較到1次比較，依次減少，因每一次比較，最大數(shù)排在后面越來越多，到最后一次只有2個數(shù)據(jù)比較，
    二重循環(huán)執(zhí)行一重循環(huán)99次。每一次選出比較剩下的最大數(shù)。
    大概就是這樣，看不明白的話，看看變址的應(yīng)用，和FOR應(yīng)用。
    [ 此帖被仙居人家在2023-02-03 15:20重新編輯 ]
    永無止境 !@#$%^&*
    天下風(fēng)云出我輩，一入江湖歲月催。
    皇圖霸業(yè)談笑中，不勝人間一場醉。
    提劍跨騎揮鬼雨，白骨如山鳥驚飛。
    塵事如潮人如水，只嘆江湖幾人回。
    freehan
    寂寂無名，默默耕耘
    級別: 探索解密
    精華主題: 0
    發(fā)帖數(shù)量: 44 個
    工控威望: 155 點
    下載積分: 222 分
    在線時間: 152(小時)
    注冊時間: 2020-05-20
    最后登錄: 2024-07-01
    查看freehan的 主題 / 回貼
    8樓  發(fā)表于: 2023-02-03 15:40
    優(yōu)秀的人到哪都優(yōu)秀！
    樓上小王
    牛刀小試
    級別: 論壇先鋒
    精華主題: 0
    發(fā)帖數(shù)量: 455 個
    工控威望: 1277 點
    下載積分: 177 分
    在線時間: 98(小時)
    注冊時間: 2021-02-19
    最后登錄: 2024-07-16
    查看樓上小王的 主題 / 回貼
    9樓  發(fā)表于: 2023-02-04 08:45
    圖片：
    圖片：
    模擬了一下，有點牛逼。我再好好研究研究   
    wentao988
    級別: 略有小成
    精華主題: 0
    發(fā)帖數(shù)量: 128 個
    工控威望: 233 點
    下載積分: 794 分
    在線時間: 107(小時)
    注冊時間: 2011-04-28
    最后登錄: 2024-10-30
    查看wentao988的 主題 / 回貼
    10樓  發(fā)表于: 2023-02-05 14:34
    謝謝大佬
    yzdz66
    級別: 探索解密
    精華主題: 0
    發(fā)帖數(shù)量: 60 個
    工控威望: 162 點
    下載積分: 640 分
    在線時間: 51(小時)
    注冊時間: 2016-09-23
    最后登錄: 2024-09-13
    查看yzdz66的 主題 / 回貼
    11樓  發(fā)表于: 2023-02-09 22:41
    //冒泡排序算法
    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;  
    本帖最近評分記錄：
  • 下載積分:+1(myjyweixin) 簡潔,明了!