数组清除重复数据

追忆帝

  

子程序名	返回值类型	公开	备 注
AB数组过滤重复
参数名	类 型	参考	可空	数组	备 注
待过滤数组1	整数型
待过滤数组2	整数型

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
合并数组	整数型		0
是否重复	逻辑型
过滤后的数组	整数型		0

清除数组 (合并数组)
计次循环首 (取数组成员数 (待过滤数组1), i)
加入成员 (合并数组, 待过滤数组1 [i])
计次循环尾 ()
计次循环首 (取数组成员数 (待过滤数组2), i)
加入成员 (合并数组, 待过滤数组2 [i])
计次循环尾 ()
计次循环首 (取数组成员数 (合并数组), i)
是否重复 ＝ 假
计次循环首 (取数组成员数 (待过滤数组1), j)
如果真 (合并数组 [i] ＝ 待过滤数组1 [j])
是否重复 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (是否重复 ＝ 假)
加入成员 (过滤后的数组, 合并数组 [i])

计次循环尾 ()
计次循环首 (取数组成员数 (合并数组), i)
是否重复 ＝ 假
计次循环首 (取数组成员数 (待过滤数组2), j)
如果真 (合并数组 [i] ＝ 待过滤数组2 [j])
是否重复 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (是否重复 ＝ 假)
加入成员 (过滤后的数组, 合并数组 [i])

计次循环尾 ()
调试输出 (“过滤后的数组数量=”, 取数组成员数 (过滤后的数组))
调试输出 (过滤后的数组)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 AB数组过滤重复<br /> .参数 待过滤数组1, 整数型, 数组<br /> .参数 待过滤数组2, 整数型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 合并数组, 整数型, , "0"<br /> .局部变量 是否重复, 逻辑型<br /> .局部变量 过滤后的数组, 整数型, , "0"<br /> <br /> 清除数组 (合并数组)<br /> .计次循环首 (取数组成员数 (待过滤数组1), i)<br />     加入成员 (合并数组, 待过滤数组1 <i>)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (待过滤数组2), i)<br />     加入成员 (合并数组, 待过滤数组2 <i>)<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (合并数组), i)<br />     是否重复 ＝ 假<br />     .计次循环首 (取数组成员数 (待过滤数组1), j)<br />         .如果真 (合并数组 <i> ＝ 待过滤数组1 [j])<br />             是否重复 ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (是否重复 ＝ 假)<br />         加入成员 (过滤后的数组, 合并数组 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (合并数组), i)<br />     是否重复 ＝ 假<br />     .计次循环首 (取数组成员数 (待过滤数组2), j)<br />         .如果真 (合并数组 <i> ＝ 待过滤数组2 [j])<br />             是否重复 ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (是否重复 ＝ 假)<br />         加入成员 (过滤后的数组, 合并数组 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 调试输出 (“过滤后的数组数量=”, 取数组成员数 (过滤后的数组))<br /> 调试输出 (过滤后的数组)

  

子程序名	返回值类型	公开	备 注
过滤重复句柄
参数名	类 型	参考	可空	数组	备 注
待过滤数组1	整数型
待过滤数组2	整数型

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
是否重复	逻辑型
过滤后的数组	整数型		0

计次循环首 (取数组成员数 (待过滤数组2), i)
是否重复 ＝ 假
计次循环首 (取数组成员数 (待过滤数组1), j)
如果真 (待过滤数组1 [i] ＝ 待过滤数组2 [j])
是否重复 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (是否重复 ＝ 假)
加入成员 (过滤后的数组, 待过滤数组1 [i])

计次循环尾 ()
调试输出 (过滤后的数组)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 过滤重复句柄<br /> .参数 待过滤数组1, 整数型, 数组<br /> .参数 待过滤数组2, 整数型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 是否重复, 逻辑型<br /> .局部变量 过滤后的数组, 整数型, , "0"<br /> <br /> .计次循环首 (取数组成员数 (待过滤数组2), i)<br />     是否重复 ＝ 假<br />     .计次循环首 (取数组成员数 (待过滤数组1), j)<br />         .如果真 (待过滤数组1 <i> ＝ 待过滤数组2 [j])<br />             是否重复 ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (是否重复 ＝ 假)<br />         加入成员 (过滤后的数组, 待过滤数组1 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (过滤后的数组)

第一个代码是:合并后清除
第二个代码是:预知两个数组数据差不多,并且确认数组2数据给数组1数据多


看自己需求使用,大佬如果觉得还能优化,不妨稍微耽误一下你的时间,贴上更高效的代码,下面奉上效果图

小小C

看的一愣一愣的，反正就是觉得很厉害

xf702

是不是提问区有人问过这个问题？

天雷

啥意思？

追忆帝

xf702 发表于 2024-11-12 21:51
是不是提问区有人问过这个问题？

这个没有,刚好想写一个小软件,用到该功能

dwcq

  

数组 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 4, 6, 8, 10, 11, 12, 13, 14, 15 }
变量循环首 (1, 取数组成员数 (数组), 1, A)
变量循环首 (取数组成员数 (数组), A ＋ 1, -1, B)
如果真 (数组 [A] ＝ 数组 [B])
删除成员 (数组, B, 1)

变量循环尾 ()
变量循环尾 ()
调试输出 (数组)
请帮我置顶

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

.版本 2<br /> .支持库 spec<br /> <br /> 数组 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 4, 6, 8, 10, 11, 12, 13, 14, 15 }<br /> <br /> .变量循环首 (1, 取数组成员数 (数组), 1, A)<br />     .变量循环首 (取数组成员数 (数组), A ＋ 1, -1, B)<br />         .如果真 (数组 [A] ＝ 数组 [B])<br />             删除成员 (数组, B, 1)<br />         .如果真结束<br /> <br />     .变量循环尾 ()<br /> <br /> .变量循环尾 ()<br /> 调试输出 (数组)<br /> <br /> 请帮我置顶

查过

已经顶贴，感谢您对论坛的支持！

豆豆灰常开心

感谢楼主分享！

qwe111qwe

感谢分享！！！！

杨明煜

学习看看..！....