排序算法

万古一念间

趣味题，烧脑了

一个多选题 A、B、C、D、 或者  A、B、C、D、E、
        假如答案：【A、B、C、D、E】
        第一次选 A
        第二次选 B
        第三次选 C
        第四次选 D
        第五次选 E
        第六次选 AB
        第七次选 AC
        第八次选 AD
        第九次选 ABC        ....
一直循环循环下去，把所有的答案 全部都打印出来

LEOONL

排列组合数.e (5.75 KB, 下载次数: 4)

2024-11-15 19:19 上传

点击文件名下载附件

chenboss

  

变量名	类 型	静态	数组	备 注
a	文本型		0
i	整数型
j	整数型
w	文本型

a ＝ { “A”, “B”, “C”, “D”, “E” }
计次循环首 (取数组成员数 (a), j)
调试输出 (w ＋ a [j])
计次循环尾 ()
计次循环首 (取数组成员数 (a), i)
w ＝ w ＋ a [i]
如果真 (取数组成员数 (a) ≠ i)
计次循环首 (取数组成员数 (a) － i, j)
如果真 (取数组成员数 (a) ＜ j ＋ i)
跳出循环 ()
调试输出 (w ＋ a [j ＋ i])
计次循环尾 ()

计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 w, 文本型<br /> <br /> a ＝ { “A”, “B”, “C”, “D”, “E” }<br /> .计次循环首 (取数组成员数 (a), j)<br />     调试输出 (w ＋ a [j])<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (a), i)<br />     w ＝ w ＋ a <i><br />     .如果真 (取数组成员数 (a) ≠ i)<br />         .计次循环首 (取数组成员数 (a) － i, j)<br />             .如果真 (取数组成员数 (a) ＜ j ＋ i)<br />                 跳出循环 ()<br />             .如果真结束<br />             调试输出 (w ＋ a [j ＋ i])<br />         .计次循环尾 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2024-11-15 19:29):
复制的会乱码成了<i>，手动改正

阿白不爱吃菜

这不就是所有组合么

cobi

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
选择框数
选择框	选择框
答案内容	文本型
i

' 将A、B、C、D、E选择框按顺序加上标记，将答案内容填写在选择框标题上
选择框数 ＝ 11  ' 标记的选择框总数，必须精准，否则提示出错
计次循环首 (选择框数, i)
选择框 ＝ 取标记组件 (i)
如果真 (选择框.选中)
答案内容 ＝ 答案内容 ＋ 到大写 (字符 (96 ＋ i)) ＋ “、” ＋ 选择框.标题 ＋ #换行符

计次循环尾 ()
调试输出 (答案内容)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 选择框数<br /> .局部变量 选择框, 选择框<br /> .局部变量 答案内容, 文本型<br /> .局部变量 i<br /> <br /> ' 将A、B、C、D、E选择框按顺序加上标记，将答案内容填写在选择框标题上<br /> 选择框数 ＝ 11  ' 标记的选择框总数，必须精准，否则提示出错<br /> .计次循环首 (选择框数, i)<br />     选择框 ＝ 取标记组件 (i)<br />     .如果真 (选择框.选中)<br />         答案内容 ＝ 答案内容 ＋ 到大写 (字符 (96 ＋ i)) ＋ “、” ＋ 选择框.标题 ＋ #换行符<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (答案内容)

鹏书

m选n所有位数组合遍历一遍就好了

万古一念间

chenboss 发表于 2024-11-15 19:17
[e=0].版本 2
.支持库 spec

谢谢  BCD 没有，算法还是有点缺陷