易语言取数的问题

你可以用冒泡法排序,比较简单.
先将6个数存入一个数组中,然后顺序读入.第一个数与第二个数比较,如果大就交换位置,第二个数再与第三个数比较......这样一个一个交换位置,结束后再循环五次,就会将最大的数排在最后,最小的数排在最前了.

或易语言自带的"超级列表框_模板.e"中有一个二分查找的子程序,利用这个子程序也可以很快地进行数组排序.
.版本 2

.子程序 二分查找, 整数型
.参数 数组, 文本型, 数组
.参数 待查, 文本型
.参数 类型, 整数型
.参数 区分大小写, 逻辑型
.局部变量 数组位置1, 整数型
.局部变量 数组位置2, 整数型
.局部变量 数组位置3, 整数型
.局部变量 数值A, 双精度小数型
.局部变量 数值B, 双精度小数型
.局部变量 文本, 文本型

数组位置1 ＝ 1
数组位置2 ＝ 取数组成员数 (数组)
.如果真 (数组位置2 ＝ 0)
返回 (1)
.如果真结束
.判断开始 (类型 ＝ 0)
数值A ＝ 到数值 (待查)
.如果真 (数值A ≥ 到数值 (数组 [数组位置2]))
返回 (数组位置2 ＋ 1)
.如果真结束
.如果真 (数值A ≤ 到数值 (数组 [1]))
返回 (1)
.如果真结束
.判断循环首 (数组位置1 ＜ 数组位置2 － 1)
数组位置3 ＝ (数组位置1 ＋ 数组位置2) ＼ 2
数值B ＝ 到数值 (数组 [数组位置3])
.如果真 (数值A ＝ 数值B)
数组位置1 ＝ 数组位置3
跳出循环 ()
.如果真结束
.如果 (数值A ＜ 数值B)