数组问题

sjfsss

  

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

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

变量名	类 型	静态	数组	备 注
a	文本型		0
b	文本型		0
i	整数型
n	文本型
新文本	文本型

a ＝ { “1”, “5”, “4”, “2”, “2” }
b ＝ { “3”, “4”, “1” }
计次循环首 (取数组成员数 (b), i)
加入成员 (a, b [i])
计次循环尾 ()
计次循环首 (取数组成员数 (a), i)
新文本 ＝ 新文本 ＋ a [i] ＋ “,”
计次循环尾 ()
n ＝ 文本_去重复文本 (新文本, “,”)
调试输出 (n)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 b, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 n, 文本型<br /> .局部变量 新文本, 文本型<br /> <br /> a ＝ { “1”, “5”, “4”, “2”, “2” }<br /> b ＝ { “3”, “4”, “1” }<br /> .计次循环首 (取数组成员数 (b), i)<br />     加入成员 (a, b <i>)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (a), i)<br />     新文本 ＝ 新文本 ＋ a <i> ＋ “,”<br /> .计次循环尾 ()<br /> <br /> n ＝ 文本_去重复文本 (新文本, “,”)<br /> 调试输出 (n)

模块： 精易模块

1056627199

sjfsss 发表于 2016-12-3 10:39
[e=3].版本 2
.支持库 spec

您好， 您这个是 已经知道了哪个重复了   而我需要的是在软件运行当中自动检测的。

sjfsss

1056627199 发表于 2016-12-3 10:42
您好， 您这个是 已经知道了哪个重复了   而我需要的是在软件运行当中自动检测的。

晕 这那是知道的 你可以 随便弄别的数组 测试

补充内容 (2016-12-3 10:46):
你的意思 不会是要我提取数组吧

1056627199

sjfsss 发表于 2016-12-3 10:45
晕 这那是知道的 你可以 随便弄别的数组 测试

补充内容 (2016-12-3 10:46):

比如
{1,1,1,1,5}就无效

sjfsss

1056627199 发表于 2016-12-3 10:50
比如
{1,1,1,1,5}就无效

我定义的 数组是 文本型  你这是 整数型 ，数字加引号

sjfsss

  

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

变量名	类 型	静态	数组	备 注
a	整数型		0
b	整数型		0
i	整数型
n	文本型
新文本	文本型

a ＝ { 1, 1, 1, 5 }
b ＝ { 3, 4, 1 }
计次循环首 (取数组成员数 (b), i)
加入成员 (a, b [i])
计次循环尾 ()
计次循环首 (取数组成员数 (a), i)
新文本 ＝ 新文本 ＋ 到文本 (a [i]) ＋ “ ”
计次循环尾 ()
n ＝ 文本_去重复文本 (新文本, “ ”)
调试输出 (n)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 整数型, , "0"<br /> .局部变量 b, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 n, 文本型<br /> .局部变量 新文本, 文本型<br /> <br /> a ＝ { 1, 1, 1, 5 }<br /> b ＝ { 3, 4, 1 }<br /> .计次循环首 (取数组成员数 (b), i)<br />     加入成员 (a, b <i>)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (a), i)<br />     新文本 ＝ 新文本 ＋ 到文本 (a <i>) ＋ “ ”<br /> .计次循环尾 ()<br /> <br /> n ＝ 文本_去重复文本 (新文本, “ ”)<br /> 调试输出 (n)

整数型 用这个

1056627199

sjfsss 发表于 2016-12-3 10:57
[e=0].版本 2
.支持库 spec

不管怎么样还是谢谢了，  但是我已经研究出来了。

sjfsss

1056627199 发表于 2016-12-3 11:22
不管怎么样还是谢谢了，  但是我已经研究出来了。

我就奇怪了 现在的人 别人答了题 怎么不评最佳答案