冒泡排序:用易语言给一组数字按大小排序
的有关信息介绍如下:
使用易语言,将一组数字放到数组中,然后将数字按大小排序。使用冒泡排序法。
打开易语言,创建windows窗口程序。
添加两个编辑框,一个按钮,编辑框1写内容9,4,7,2,5,6,1,3,10,8
点击按钮,开始编写代码,将编辑框1中的数字内容分割为数组。
冒泡排序,比较相邻两个数字大小,前大后小则互换位置,数组内所有成员比较结束后,最大的成员被留在了最后。然后不去管最后一个成员,对前面的成员再次进行之前的比较互换过程。如果有互换计次加1,使用循环判断首()命令,当计次为0时,循环结束。代码如下:
.版本 2
.子程序 _按钮1_被单击
.局部变量 数字排序, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 临时文本, 文本型
.局部变量 计次, 整数型, , , 互换次数,有互换操作就计次加1
.局部变量 循环次数, 整数型
数字排序 = 分割文本 (编辑框1.内容, “,”, )
循环次数 = 取数组成员数 (数字排序) - 1
.循环判断首 ()
计次 = 0
.计次循环首 (循环次数, i)
.如果真 (到整数 (数字排序 [i]) > 到整数 (数字排序 [i + 1]))
临时文本 = 数字排序 [i]
数字排序 [i] = 数字排序 [i + 1]
数字排序 [i + 1] = 临时文本
计次 = 计次 + 1
.如果真结束
.计次循环尾 ()
循环次数 = 循环次数 - 1
.循环判断尾 (计次 > 0)
将最终结果输出至编辑框2中。完整代码如下:
.版本 2
.子程序 _按钮1_被单击
.局部变量 数字排序, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 临时文本, 文本型
.局部变量 计次, 整数型, , , 互换次数,有互换操作就计次加1
.局部变量 循环次数, 整数型
数字排序 = 分割文本 (编辑框1.内容, “,”, )
循环次数 = 取数组成员数 (数字排序) - 1
.循环判断首 ()
计次 = 0
.计次循环首 (循环次数, i)
.如果真 (到整数 (数字排序 [i]) > 到整数 (数字排序 [i + 1]))
临时文本 = 数字排序 [i]
数字排序 [i] = 数字排序 [i + 1]
数字排序 [i + 1] = 临时文本
计次 = 计次 + 1
.如果真结束
.计次循环尾 ()
循环次数 = 循环次数 - 1
.循环判断尾 (计次 > 0)
编辑框2.内容 = “”
.计次循环首 (取数组成员数 (数字排序), i)
编辑框2.内容 = 编辑框2.内容 + 数字排序 [i] + “,”
.计次循环尾 ()



