易语言 数组排列算法
发布网友
发布时间：2022-05-02 06:46
共1个回答
热心网友
时间：2022-06-29 06:24
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 a, 整数型, , "5"
a ＝ { 1, 2, 3, 4, 5 }
排列 (a, 3)
.子程序 排列
.参数 a, 整数型, 数组
.参数 n, 整数型
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 k, 整数型
.局部变量 临时文本, 文本型
.计次循环首 (到整数 (求次方 (2, 取数组成员数 (a))) － 1, i)
k ＝ 0
临时文本 ＝ “”
j ＝ 1
.判断循环首 (i ≠ 0)
.如果真 (i ％ 2 ＝ 1)
k ＝ k ＋ 1
临时文本 ＝ 临时文本 ＋ 到文本 (a [j])
.如果真结束
i ＝ i ÷ 2
j ＝ j ＋ 1
.判断循环尾 ()
.如果真 (k ＝ n)
编辑框1.加入文本 (临时文本 ＋ #换行符)
.如果真结束
.计次循环尾 ()
