易语言数组成员重复出现次数排序（类似于彩票热号）

nasyyvc

‘如题，感谢大佬指点

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
随机数组	整数型	20

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
i	整数型

置随机数种子 ()
计次循环首 (取数组成员数 (随机数组), i)
随机数组 [i] ＝ 取随机数 (0, 20)
编辑框_原数组.加入文本 (到文本 (随机数组 [i]) ＋ #换行符 )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮_重复次数_被单击

变量名	类 型	静态	数组	备 注
节点	节点
i	整数型
j	整数型
重复次数	整数型

计次循环首 (取数组成员数 (随机数组), i)
重复次数 ＝ 0
计次循环首 (取数组成员数 (随机数组), j)
如果真 (随机数组 [i] ＝ 随机数组 [j])
重复次数 ＝ 重复次数 ＋ 1

计次循环尾 ()
如果真 (节点.加入属性 (到文本 (随机数组 [i]), 0))
如果 (重复次数 ≠ 1)
编辑框_输出数组.加入文本 (到文本 (随机数组 [i]) ＋ “重复次数为：” ＋ 到文本 (重复次数) ＋ #换行符 )
编辑框_输出数组.加入文本 (“没有重复出现的数字为：” ＋ 到文本 (随机数组 [i]) ＋ #换行符 )


计次循环尾 ()

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

' 怎么实现重复次数排序，比如9出现2，20出现4次，15出现3次，那么输出结果为20，15，9，后面出现次数1的排在最后

i支持库列表	支持库注释
EDataStructure	数据结构支持库

.版本 2<br /> .支持库 EDataStructure<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 随机数组, 整数型, , "20"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> 置随机数种子 ()<br /> .计次循环首 (取数组成员数 (随机数组), i)<br />     随机数组 <i> ＝ 取随机数 (0, 20)<br />     编辑框_原数组.加入文本 (到文本 (随机数组 <i>) ＋ #换行符)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮_重复次数_被单击<br /> .局部变量 节点, 节点<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 重复次数, 整数型<br /> <br /> .计次循环首 (取数组成员数 (随机数组), i)<br />     重复次数 ＝ 0<br />     .计次循环首 (取数组成员数 (随机数组), j)<br />         .如果真 (随机数组 <i> ＝ 随机数组 [j])<br />             重复次数 ＝ 重复次数 ＋ 1<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (节点.加入属性 (到文本 (随机数组 <i>), 0))<br />         .如果 (重复次数 ≠ 1)<br />             编辑框_输出数组.加入文本 (到文本 (随机数组 <i>) ＋ “重复次数为：” ＋ 到文本 (重复次数) ＋ #换行符)<br />         .否则<br />             编辑框_输出数组.加入文本 (“没有重复出现的数字为：” ＋ 到文本 (随机数组 <i>) ＋ #换行符)<br />         .如果结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮_次数排序_被单击<br /> <br /> ' 怎么实现重复次数排序，比如9出现2，20出现4次，15出现3次，那么输出结果为20，15，9，后面出现次数1的排在最后

我非平凡

.版本 2 .支持库 EDataStructure  .程序集 窗口程序集_启动窗口 .程序集变量 随机数组, 整数型, , "20"  .子程序 __启动窗口_创建完毕 .局部变量 i, 整数型  置随机数种子 () .计次循环首 (取数组成员数 (随机数组), i)     随机数组 <i> ＝ 取随机数 (0, 20)     编辑框_原数组.加入文本 (到文本 (随机数组 <i>) ＋ #换行符) .计次循环尾 ()  .子程序 _按钮_重复次数_被单击 .局部变量 节点, 节点 .局部变量 i, 整数型 .局部变量 j, 整数型 .局部变量 重复次数, 整数型  .计次循环首 (取数组成员数 (随机数组), i)     重复次数 ＝ 0     .计次循环首 (取数组成员数 (随机数组), j)         .如果真 (随机数组 <i> ＝ 随机数组 [j])             重复次数 ＝ 重复次数 ＋ 1         .如果真结束      .计次循环尾 ()     .如果真 (节点.加入属性 (到文本 (随机数组 <i>), 0))         .如果 (重复次数 ≠ 1)             编辑框_输出数组.加入文本 (到文本 (随机数组 <i>) ＋ “重复次数为：” ＋ 到文本 (重复次数) ＋ #换行符)         .否则             编辑框_输出数组.加入文本 (“没有重复出现的数字为：” ＋ 到文本 (随机数组 <i>) ＋ #换行符)         .如果结束      .如果真结束  .计次循环尾 ()  .子程序 _按钮_次数排序_被单击  ' 怎么实现重复次数排序，比如9出现2，20出现4次，15出现3次，那么输出结果为20，15，9，后面出现次数1的排在最后

帅佛哈哈

使用多维数组  将多维数组进行排序即可

a393518964

不错学习了 谢谢分享

Aa798040941

不错不错

Aa798040941

不错不错

aosheng

66666666666666666666666

ruiqin0214

谢谢分享

nasyyvc

笨来无一悟 发表于 2022-7-30 20:14
次数排序你自己搞定了么?

搞定了啊

来一手

谢谢分享

笨来无一悟

次数排序你自己搞定了么?