如果再加上讓我們從小到大排列，那就更好玩了   

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;