.版本 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])

.变量循环尾 ()