hbangchan
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 41 個
工控威望: 139 點
下載積分: 585 分
在線時間: 62(小時)
注冊時間: 2016-04-12
最后登錄: 2023-09-21
查看hbangchan的 主題 / 回貼
12樓  發(fā)表于: 2016-07-08 11:30
如果再加上讓我們從小到大排列,那就更好玩了   
wmw186
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 56 個
工控威望: 314 點
下載積分: 131 分
在線時間: 55(小時)
注冊時間: 2021-11-09
最后登錄: 2024-11-02
查看wmw186的 主題 / 回貼
13樓  發(fā)表于: 2022-11-28 13:38
IF LDP (1,M100) THEN
    輪詢1:=0 ;
    輪詢2:=0 ;
    FMOVP_M(M100, 0, 20, 數(shù)組2[0]);
WHILE 輪詢2 < 20 AND  輪詢1 < 27 DO
    IF 數(shù)組1[ 輪詢1]<>0  THEN
        數(shù)組2[ 輪詢2]:=數(shù)組1[ 輪詢1];
        輪詢1:=輪詢1+1;
        輪詢2:=輪詢2+1;
        ELSE 輪詢1:=輪詢1+1;
    END_IF;
END_WHILE;
END_IF;