判断数组里是否有重复成员

kmskik

金胖子 发表于 2021-12-16 22:17
[e=0].版本 2

.子程序 数组_去重复_文本型, 整数型, 公开, 返回剩余不重复数组的成员数量，内置哈希表高 ...

号的，非常感谢

APPLEUFO

  

子程序名	返回值类型	公开	备 注
子程序_有无重复	逻辑型
参数名	类 型	参考	可空	数组	备 注
参数_数组	整数型

变量名	类 型	静态	数组	备 注
n1	整数型
局变_左	整数型
m1	整数型

计次循环首 (取数组成员数 (参数_数组), n1)
局变_左 ＝ 参数_数组 [n1]
计次循环首 (取数组成员数 (参数_数组), m1)
如果 (n1 ＝ m1)
' 跳过


如果 (局变_左 ＝ 参数_数组 [m1])
返回 (真)


' 无动作，继续


计次循环尾 ()
计次循环尾 ()
返回 (假)

.版本 2<br /> <br /> .子程序 子程序_有无重复, 逻辑型, 公开<br /> .参数 参数_数组, 整数型, 数组<br /> .局部变量 n1, 整数型<br /> .局部变量 局变_左, 整数型<br /> .局部变量 m1, 整数型<br /> <br /> <br /> .计次循环首 (取数组成员数 (参数_数组), n1)<br /> <br />     局变_左 ＝ 参数_数组 [n1]<br /> <br />     .计次循环首 (取数组成员数 (参数_数组), m1)<br /> <br />         .如果 (n1 ＝ m1)<br />             ' 跳过<br />         .否则<br /> <br />             .如果 (局变_左 ＝ 参数_数组 [m1])<br /> <br />                 返回 (真)<br />             .否则<br /> <br />                 ' 无动作，继续<br />             .如果结束<br /> <br />         .如果结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> 返回 (假)

这就完事了，用不着添加删除数组，很慢的

金胖子

kmskik 发表于 2021-12-16 18:16
好的。谢谢，我还没学那个，去看下

  

子程序名	返回值类型	公开	备 注
数组_去重复_文本型	整数型		返回剩余不重复数组的成员数量，内置哈希表高速处理
参数名	类 型	参考	可空	数组	备 注
文本型数组	文本型				要去重复的 文本型数组

变量名	类 型	静态	数组	备 注
_局部1	哈希表类zy
_局部2	文本型
_局部3	整数型

_局部1.创建 ( #文本型, #整数型, , )
变量循环首 (数组_取成员数 (文本型数组), 1, -1, _局部3)
如果 (文本型数组 [_局部3] ＝ “”)
如果真 (_局部1.是否包含键 (“233|空|文|本|233”) ＝ 真)
删除成员 (文本型数组, _局部3, 1)
_局部1.添加 (“233|空|文|本|233”, 0)
如果真 (_局部1.是否包含键 (文本型数组 [_局部3]) ＝ 真)
删除成员 (文本型数组, _局部3, 1)
_局部1.添加 (文本型数组 [_局部3], 0)

变量循环尾 ()
返回 (_局部1.取数量 ())

.版本 2<br /> <br /> .子程序 数组_去重复_文本型, 整数型, 公开, 返回剩余不重复数组的成员数量，内置哈希表高速处理<br /> .参数 文本型数组, 文本型, 参考 数组, 要去重复的 文本型数组<br /> .局部变量 _局部1, 哈希表类zy<br /> .局部变量 _局部2, 文本型<br /> .局部变量 _局部3, 整数型<br /> <br /> _局部1.创建 (#文本型, #整数型, , )<br /> .变量循环首 (数组_取成员数 (文本型数组), 1, -1, _局部3)<br />     .如果 (文本型数组 [_局部3] ＝ “”)<br />         .如果真 (_局部1.是否包含键 (“233|空|文|本|233”) ＝ 真)<br />             删除成员 (文本型数组, _局部3, 1)<br />         .如果真结束<br />         _局部1.添加 (“233|空|文|本|233”, 0)<br />     .否则<br />         .如果真 (_局部1.是否包含键 (文本型数组 [_局部3]) ＝ 真)<br />             删除成员 (文本型数组, _局部3, 1)<br />         .如果真结束<br />         _局部1.添加 (文本型数组 [_局部3], 0)<br />     .如果结束<br /> <br /> .变量循环尾 ()<br /> 返回 (_局部1.取数量 ())

我给你个示例，你用论坛大佬：落的哈希表的模块，直接运行对比一下，记得先初始化哈希表

风清云游

支持开源 加油

kmskik

金胖子 发表于 2021-12-16 17:09
找不到是因为大都用哈希表了，建议搜索一下大佬的哈希表的模块，上手试试，海量数据对比真的超快 ...

好的。谢谢，我还没学那个，去看下

Suky

kmskik 发表于 2021-12-16 16:54
我刚充了10块钱换的精币{:3_48:}

跟精币多少无关，看看你的论坛积分、等级   还有zc时间

金胖子

找不到是因为大都用哈希表了，建议搜索一下大佬的哈希表的模块，上手试试，海量数据对比真的超快

kmskik

铃儿响叮当 发表于 2021-12-16 13:53
信你个鬼哦    zc6年  2500分的新手

我刚充了10块钱换的精币{:3_48:}

fjgh

感谢分享

seven7c

去重后能排列吗？