数组里面判断一下，变成新的数组

jjdd2

数组里面如下{你好，文件，55,8k，kl，mi，ll，ku，li  ，你好  ,99，mi，56，文件，mi，你好，886,551，你好健康，好几家，你好}



现在算出里面每个成员的重复次数》=2的

拿出来  组成一个新的数组      {你好，文件，mi}？   

怎么写 ，谢谢各位大佬

Ruang

  

子程序名	返回值类型	公开	备 注
功能_取重复次数
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型
大于次数	整数型
返回数组	文本型

变量名	类 型	静态	数组	备 注
数组1	文本型		0
数组2	文本型		0
计次	整数型
次数	整数型
新数组	文本型		0

数组1 ＝ 文本数组
数组2 ＝ 文本数组
数组_去重复 (数组1, )
计次循环首 (取数组成员数 (数组1), 计次)
次数 ＝ 数组_取次数 (数组2, 数组1 [计次])
如果真 (次数 ≥ 大于次数)
加入成员 (新数组, 数组1 [计次])

计次循环尾 ()
返回数组 ＝ 新数组

.版本 2<br /> <br /> .子程序 功能_取重复次数<br /> .参数 文本数组, 文本型, 数组<br /> .参数 大于次数, 整数型<br /> .参数 返回数组, 文本型, 数组<br /> .局部变量 数组1, 文本型, , "0"<br /> .局部变量 数组2, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 次数, 整数型<br /> .局部变量 新数组, 文本型, , "0"<br /> <br /> 数组1 ＝ 文本数组<br /> 数组2 ＝ 文本数组<br /> 数组_去重复 (数组1, )<br /> .计次循环首 (取数组成员数 (数组1), 计次)<br />     次数 ＝ 数组_取次数 (数组2, 数组1 [计次])<br />     .如果真 (次数 ≥ 大于次数)<br />         加入成员 (新数组, 数组1 [计次])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回数组 ＝ 新数组

用精易模块


补充内容 (2025-4-28 21:15):
这是大于等于的，把大于等于号改成等于号就好了

走一回

这不就是找到有重复的值吗？用节点很方便的，加入节点时返回为假的就是重复的值 ，就可以加入成员到新的数组里去了。还是很方便的。

aipca

用到精易模块

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
数组	文本型		0
新数组	文本型		0

数组 ＝ { “你好”, “文件”, “55”, “8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ”, “99”, “mi”, “56”, “文件”, “mi”, “你好”, “886”, “551”, “你好健康”, “好几家”, “你好” }
数组_取重复 (, 数组)
调试输出 (数组)

子程序名	返回值类型	公开	备 注
数组_取重复			取单个数组中，重复的元素
参数名	类 型	参考	可空	数组	备 注
整数数组	整数型
文本数组	文本型

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

如果真 (是否为空 (整数数组) ＝ 假)
复制数组 (数组_副本_整数, 整数数组)
数组_去重复 (, 数组_副本_整数)
计次循环首 (取数组成员数 (数组_副本_整数), i)
计次循环首 (取数组成员数 (整数数组), j)
如果真 (数组_副本_整数 [i] ＝ 整数数组 [j])
加入成员 (数组_整数, 数组_副本_整数 [i])
跳出循环 ()

计次循环尾 ()
计次循环尾 ()
复制数组 (整数数组, 数组_整数)

如果真 (是否为空 (文本数组) ＝ 假)
复制数组 (数组_副本_文本, 文本数组)
数组_去重复 (数组_副本_文本, )
计次循环首 (取数组成员数 (数组_副本_文本), i)
计次循环首 (取数组成员数 (文本数组), j)
如果真 (数组_副本_文本 [i] ＝ 文本数组 [j])
加入成员 (数组_文本, 数组_副本_文本 [i])
跳出循环 ()

计次循环尾 ()
计次循环尾 ()
复制数组 (文本数组, 数组_文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 新数组, 文本型, , "0"<br /> <br /> 数组 ＝ { “你好”, “文件”, “55”, “8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ”, “99”, “mi”, “56”, “文件”, “mi”, “你好”, “886”, “551”, “你好健康”, “好几家”, “你好” }<br /> <br /> 数组_取重复 (, 数组)<br /> 调试输出 (数组)<br /> <br /> .子程序 数组_取重复, , , 取单个数组中，重复的元素<br /> .参数 整数数组, 整数型, 参考 可空 数组<br /> .参数 文本数组, 文本型, 参考 可空 数组<br /> .局部变量 数组_副本_整数, 整数型, , "0"<br /> .局部变量 数组_副本_文本, 文本型, , "0"<br /> .局部变量 数组_整数, 整数型, , "0"<br /> .局部变量 数组_文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> <br /> .如果真 (是否为空 (整数数组) ＝ 假)<br />     复制数组 (数组_副本_整数, 整数数组)<br />     数组_去重复 (, 数组_副本_整数)<br />     .计次循环首 (取数组成员数 (数组_副本_整数), i)<br />         .计次循环首 (取数组成员数 (整数数组), j)<br />             .如果真 (数组_副本_整数 <i> ＝ 整数数组 [j])<br />                 加入成员 (数组_整数, 数组_副本_整数 <i>)<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .计次循环尾 ()<br />     复制数组 (整数数组, 数组_整数)<br /> .如果真结束<br /> <br /> .如果真 (是否为空 (文本数组) ＝ 假)<br />     复制数组 (数组_副本_文本, 文本数组)<br />     数组_去重复 (数组_副本_文本, )<br />     .计次循环首 (取数组成员数 (数组_副本_文本), i)<br />         .计次循环首 (取数组成员数 (文本数组), j)<br />             .如果真 (数组_副本_文本 <i> ＝ 文本数组 [j])<br />                 加入成员 (数组_文本, 数组_副本_文本 <i>)<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .计次循环尾 ()<br />     复制数组 (文本数组, 数组_文本)

走一回

  

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

变量名	类 型	静态	数组	备 注
aa	文本型		0
局_节点	节点
bb	文本型		0
i

aa ＝ { “你好”, “文件”, “55,8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ,99”, “mi”, “56”, “文件”, “mi”, “你好”, “886,551”, “你好健康”, “好几家”, “你好” }
计次循环首 (取数组成员数 (aa), i)
如果真 (局_节点.加入属性 (aa [i], i) ＝ 假)
加入成员 (bb, aa [i])

计次循环尾 ()
数组_去重复 (bb, )
调试输出 (bb)

i支持库列表	支持库注释
EDataStructure	数据结构支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 aa, 文本型, , "0"<br /> .局部变量 局_节点, 节点<br /> .局部变量 bb, 文本型, , "0"<br /> .局部变量 i<br /> <br /> aa ＝ { “你好”, “文件”, “55,8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ,99”, “mi”, “56”, “文件”, “mi”, “你好”, “886,551”, “你好健康”, “好几家”, “你好” }<br /> .计次循环首 (取数组成员数 (aa), i)<br />     .如果真 (局_节点.加入属性 (aa <i>, i) ＝ 假)<br />         加入成员 (bb, aa <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 数组_去重复 (bb, )<br /> 调试输出 (bb)

* 数组:3{“mi”,“文件”,“你好”}
被调试易程序运行完毕

Ruang

  

子程序名	返回值类型	公开	备 注
功能_取重复次数
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型
等于次数	整数型
返回数组	文本型

变量名	类 型	静态	数组	备 注
数组1	文本型		0
数组2	文本型		0
计次	整数型
次数	整数型
新数组	文本型		0

数组1 ＝ 文本数组
数组2 ＝ 文本数组
数组_去重复 (数组1, )
计次循环首 (取数组成员数 (数组1), 计次)
次数 ＝ 数组_取次数 (数组2, 数组1 [计次])
如果真 (次数 ＝ 等于次数)
加入成员 (新数组, 数组1 [计次])

计次循环尾 ()
返回数组 ＝ 新数组

.版本 2<br /> <br /> .子程序 功能_取重复次数<br /> .参数 文本数组, 文本型, 数组<br /> .参数 等于次数, 整数型<br /> .参数 返回数组, 文本型, 数组<br /> .局部变量 数组1, 文本型, , "0"<br /> .局部变量 数组2, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 次数, 整数型<br /> .局部变量 新数组, 文本型, , "0"<br /> <br /> 数组1 ＝ 文本数组<br /> 数组2 ＝ 文本数组<br /> 数组_去重复 (数组1, )<br /> .计次循环首 (取数组成员数 (数组1), 计次)<br />     次数 ＝ 数组_取次数 (数组2, 数组1 [计次])<br />     .如果真 (次数 ＝ 等于次数)<br />         加入成员 (新数组, 数组1 [计次])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回数组 ＝ 新数组

萧楚楠

走一回 发表于 2025-4-28 21:19

  

[/quote]
大佬写的很巧妙，但是既然都用了节点就不需要精易模块了，再来一个节点就好了
[e=0].版本 2

子程序名	返回值类型	公开	备 注
_临时子程序

变量名	类 型	静态	数组	备 注
aa	文本型		0
局_节点	节点
i	整数型
节点	节点
bb	文本型		0

aa ＝ { “你好”, “文件”, “55,8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ,99”, “mi”, “56”, “文件”, “mi”, “你好”, “886,551”, “你好健康”, “好几家”, “你好” }
计次循环首 (取数组成员数 (aa), i)
如果真 (局_节点.加入属性 (aa [i], i) ＝ 假)
节点.加入属性 (aa [i], i)

计次循环尾 ()
节点.取全部属性名 (bb)
调试输出 (bb)     ’数组:3{“mi”,“文件”,“你好”}

i支持库列表	支持库注释
EDataStructure	数据结构支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 spec</blockquote></div><br /> 大佬写的很巧妙，但是既然都用了节点就不需要精易模块了，再来一个节点就好了<br /> [e=0].版本 2<br /> .支持库 EDataStructure<br /> .支持库 spec<br /> <br /> .子程序 _临时子程序<br /> .局部变量 aa, 文本型, , "0"<br /> .局部变量 局_节点, 节点<br /> .局部变量 i, 整数型<br /> .局部变量 节点, 节点<br /> .局部变量 bb, 文本型, , "0"<br /> <br /> aa ＝ { “你好”, “文件”, “55,8k”, “kl”, “mi”, “ll”, “ku”, “li  ”, “你好  ,99”, “mi”, “56”, “文件”, “mi”, “你好”, “886,551”, “你好健康”, “好几家”, “你好” }<br /> .计次循环首 (取数组成员数 (aa), i)<br />     .如果真 (局_节点.加入属性 (aa <i>, i) ＝ 假)<br />         节点.加入属性 (aa <i>, i)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 节点.取全部属性名 (bb)<br /> 调试输出 (bb)     ’数组:3{“mi”,“文件”,“你好”}