成全高清免费完整观看,日韩一区二区三免费高清,欧美在线看欧美视频免费,日本无码专区无码二区

penginginten
級別: 工控俠客
精華主題: 0
發帖數量: 199 個
工控威望: 3508 點
下載積分: 3317 分
在線時間: 193(小時)
注冊時間: 2019-04-08
最后登錄: 2025-07-11
查看penginginten的 主題 / 回貼
樓主  發表于: 2022-08-28 11:02
//定義變量
VAR
    nStart                :ARRAY[1..100]OF BOOL;
    nWord                :ARRAY[1..200]OF INT;
    nWord1                :ARRAY[1..100]OF INT;
    i                    :INT;
    l                    :INT;
    q                    :INT;
END_VAR

//程序

//賦值
IF nStart[1] THEN
    FOR i:=1 TO UINT_TO_INT(SIZEOF(nWord)/2) DO
        nWord:=1000-i;
    END_FOR
    nStart[1]:=FALSE;
END_IF

//冒泡排序
IF nStart[2] THEN
    FOR i:=1 TO UINT_TO_INT(SIZEOF(nWord)/2) DO
        FOR l:=1 TO UINT_TO_INT(SIZEOF(nWord)/2)-i DO
            IF nWord[l+1]<nWord[l] THEN
                q:=nWord[l+1];
                nWord[l+1]:=nWord[l];
                nWord[l]:=q;
            END_IF
        END_FOR
    END_FOR
    nStart[2]:=FALSE;
END_IF

<sup id="t49uz"><pre id="t49uz"></pre></sup>
    <xmp id="t49uz"><sup id="t49uz"><pre id="t49uz"></pre></sup>
    <sup id="t49uz"><font id="t49uz"></font></sup>
    <sup id="t49uz"></sup>
    主站蜘蛛池模板: 涡阳县| 少妇被粗大的猛烈进出A片久久久 欧洲亚洲中日韩在线观看手机版 日产中文乱码字幕无线观看 | 性慾旺盛的肥岳| 禹城市| 犍为县| 上思县| 罗源县| 免费国产在线精品一区| 肉肉写得很细致的床戏| 敦煌市| 延寿县| 日韩精品人妻一区二区中文八零| 永康市| 欧美熟妇zozozo| 久久热在线视频| 日本免费docker| 欧美日韩视频高清一区| 亚洲乱码国产乱码精品精大量| 高中妺妺让我c了6次| 全黄做爰100分钟视频| 欧美香蕉爽爽人人爽| 石棉县| 青春草在线视频免费观看| 乱熟女高潮一区二区在线| 少妇高潮灌满白浆毛片免费看| 欧美亚韩一区二区三区| 永康市| 互换人妻HD中字| 大同市| 欧美乱色伦图片区| 阿拉善盟| 欧美日韩精品人妻狠狠躁免费视频| 阳东县| 欧美色插| 日韩精品无码一区AAA片| 龙山县| 苍溪县| 阿坝| 人妻情事(H)海棠书屋| 股票| 日本翁熄系列乱在线视频|