数组_去重复_文本型

Ruang

  

子程序名	返回值类型	公开	备 注
数组_去重复_文本型	整数型		返回剩余不重复数组的成员数量
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型				要去重复的 文本数组
返回数组	文本型

变量名	类 型	静态	数组	备 注
计次1	整数型
计次2	整数型
数组	文本型		0
文本判断	逻辑型

计次循环首 (取数组成员数 (文本数组), 计次1)
文本判断 ＝ 假
计次循环首 (取数组成员数 (数组), 计次2)
如果真 (数组 [计次2] ＝ 文本数组 [计次1])
文本判断 ＝ 真

计次循环尾 ()
如果真 (文本判断 ＝ 假)
加入成员 (数组, 文本数组 [计次1])

计次循环尾 ()
返回数组 ＝ 数组
返回 (取数组成员数 (数组))

.版本 2<br /> <br /> .子程序 数组_去重复_文本型, 整数型, , 返回剩余不重复数组的成员数量<br /> .参数 文本数组, 文本型, 数组, 要去重复的 文本数组<br /> .参数 返回数组, 文本型, 可空 数组<br /> .局部变量 计次1, 整数型<br /> .局部变量 计次2, 整数型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 文本判断, 逻辑型<br /> <br /> .计次循环首 (取数组成员数 (文本数组), 计次1)<br />     文本判断 ＝ 假<br />     .计次循环首 (取数组成员数 (数组), 计次2)<br />         .如果真 (数组 [计次2] ＝ 文本数组 [计次1])<br />             文本判断 ＝ 真<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (文本判断 ＝ 假)<br />         加入成员 (数组, 文本数组 [计次1])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回数组 ＝ 数组<br /> 返回 (取数组成员数 (数组))

偶尔看到求助区求助类似问题，建议增加或改进

wi49rufj22

文本判断=真
后面不应该直接就是： 跳出循环嘛

常先生

666666666666666666666

项目部004

  

数组_去重复 (, )

数组_去重复 (, )

蛤蟆功

感谢分享

Sadlg

增加或改进

dangerace

看到双层循环结构，这个算法效率就高不了。小小的折腾一下还行，遇到十万以上的数组，就歇菜了。