易语言的冒泡排序法

.版本 2

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 num, 整数型, , "7"
.局部变量 i, 整数型
.局部变量 j, 整数型


' 冒泡排序法:'
num [1] ＝ 7
num [2] ＝ 99
num [3] ＝ 44
num [4] ＝ 16
num [5] ＝ 85
num [6] ＝ 65
num [7] ＝ 14

.计次循环首 (7, i)
    标准输出 (#标准输出设备, 到文本 (num [i]) ＋ #换行符)
.计次循环尾 ()

标准输出 (#标准输出设备, #换行符 ＋ #换行符)

.计次循环首 (7, i)
    .计次循环首 (8 － i － 1, j)
        .如果真 (num [j] ≥ num [j ＋ 1])
            num [j] ＝ 位异或 (num [j], num [j ＋ 1])
            num [j ＋ 1] ＝ 位异或 (num [j], num [j ＋ 1])
            num [j] ＝ 位异或 (num [j], num [j ＋ 1])
        .如果真结束

    .计次循环尾 ()
.计次循环尾 ()

.计次循环首 (7, i)
    标准输出 (#标准输出设备, 到文本 (num [i]) ＋ #换行符)
.计次循环尾 ()


标准输入 (真)
返回 (0)  ' 可以根据您的需要返回任意数值