易语言冒泡排序

1、新建易语言

2、创建指定控件

一个编辑框  一个标签

3、代码：

.版本 2

.子程序 __启动窗口_创建完毕

.局部变量 arr, 整数型, , "10"

.局部变量 n, 整数型

.局部变量 i, 整数型

.局部变量 t, 整数型

' //冒泡排序，从小到大

arr ＝ { 89, 56, 34, 48, 57, 62, 74, 85, 93, 105 }

.变量循环首 (1, 10, 1, n)

    .变量循环首 (1, 10 － n, 1, i)

        .如果真 (arr [i] ＞ arr [i ＋ 1])

            t ＝ arr [i]

            arr [i] ＝ arr [i ＋ 1]

            arr [i ＋ 1] ＝ t

        .如果真结束

    .变量循环尾 ()

.变量循环尾 ()

.变量循环首 (1, 10, 1, i)

    编辑框1.内容 ＝ 编辑框1.内容 ＋ “ ” ＋ 到文本 (arr [i])

.变量循环尾 ()

1、测试结果成功