找出两数组不同

Liujian123

数组1{"3","1","2","4",} 数组2{"1","3","4",}怎么找出数组2跟数组1对比缺少“2”

Marvin

1.e (2.59 KB, 下载次数: 8)

昨天 16:29 上传

点击文件名下载附件

515889127

精易模块   数组_文本数组比较取出不同

是永乐哟

  

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

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

变量名	类 型	静态	数组	备 注
数组1	文本型		0
数组2	文本型		0
缺少的文本	文本型

数组1 ＝ { “3”, “1”, “2”, “4” }
数组2 ＝ { “1”, “3”, “4” }
缺少的文本 ＝ 寻找缺失元素 (数组1, 数组2)
调试输出 (“数组1: 3,1,2,4”)
调试输出 (“数组2: 1,3,4”)
调试输出 (“数组2相比数组1缺少的元素: ” ＋ 缺少的文本)
' [16:58:04] * “数组2相比数组1缺少的元素: 2”

子程序名	返回值类型	公开	备 注
寻找缺失元素	文本型		逗号分隔
参数名	类 型	参考	可空	数组	备 注
数组1	文本型				参考数组
数组2	文本型				参考数组

变量名	类 型	静态	数组	备 注
缺失数组	文本型		0
i	整数型
j	整数型
是否存在	逻辑型

变量循环首 (1, 取数组成员数 (数组1), 1, i)
是否存在 ＝ 假
变量循环首 (1, 取数组成员数 (数组2), 1, j)
如果真 (数组1 [i] ＝ 数组2 [j])
是否存在 ＝ 真
跳出循环 ()

变量循环尾 ()
如果真 (是否存在 ＝ 假)
加入成员 (缺失数组, 数组1 [i])

变量循环尾 ()
返回 (数组_合并 (缺失数组, “,”))

子程序名	返回值类型	公开	备 注
数组_合并	文本型
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型
分隔符	文本型

变量名	类 型	静态	数组	备 注
结果文本	文本型
n	整数型
成员数	整数型

结果文本 ＝ “”
成员数 ＝ 取数组成员数 (文本数组)
如果真 (成员数 ＞ 0)
结果文本 ＝ 文本数组 [1]
变量循环首 (2, 成员数, 1, n)
结果文本 ＝ 结果文本 ＋ 分隔符 ＋ 文本数组 [n]
变量循环尾 ()
返回 (结果文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数组1, 文本型, , "0"<br /> .局部变量 数组2, 文本型, , "0"<br /> .局部变量 缺少的文本, 文本型<br /> <br /> 数组1 ＝ { “3”, “1”, “2”, “4” }<br /> 数组2 ＝ { “1”, “3”, “4” }<br /> <br /> 缺少的文本 ＝ 寻找缺失元素 (数组1, 数组2)<br /> <br /> 调试输出 (“数组1: 3,1,2,4”)<br /> 调试输出 (“数组2: 1,3,4”)<br /> 调试输出 (“数组2相比数组1缺少的元素: ” ＋ 缺少的文本)<br /> ' [16:58:04] * “数组2相比数组1缺少的元素: 2”<br /> <br /> .子程序 寻找缺失元素, 文本型, 公开, 逗号分隔<br /> .参数 数组1, 文本型, 数组, 参考数组<br /> .参数 数组2, 文本型, 数组, 参考数组<br /> .局部变量 缺失数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 是否存在, 逻辑型<br /> <br /> .变量循环首 (1, 取数组成员数 (数组1), 1, i)<br />     是否存在 ＝ 假<br />     .变量循环首 (1, 取数组成员数 (数组2), 1, j)<br />         .如果真 (数组1 <i> ＝ 数组2 [j])<br />             是否存在 ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .变量循环尾 ()<br />     .如果真 (是否存在 ＝ 假)<br />         加入成员 (缺失数组, 数组1 <i>)<br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> 返回 (数组_合并 (缺失数组, “,”))<br /> <br /> .子程序 数组_合并, 文本型<br /> .参数 文本数组, 文本型, 数组<br /> .参数 分隔符, 文本型<br /> .局部变量 结果文本, 文本型<br /> .局部变量 n, 整数型<br /> .局部变量 成员数, 整数型<br /> <br /> 结果文本 ＝ “”<br /> 成员数 ＝ 取数组成员数 (文本数组)<br /> .如果真 (成员数 ＞ 0)<br />     结果文本 ＝ 文本数组 [1]<br />     .变量循环首 (2, 成员数, 1, n)<br />         结果文本 ＝ 结果文本 ＋ 分隔符 ＋ 文本数组 [n]<br />     .变量循环尾 ()<br /> .如果真结束<br /> 返回 (结果文本)

RainCharm

  

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

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

a ＝ { “3”, “1”, “2”, “4” }
b ＝ { “1”, “3”, “4” }
计次循环首 (取数组成员数 (a), i)
如果真 (数组_是否存在 (b, a [i]) ＝ 假)
调试输出 (a [i])

计次循环尾 ()
开始运行被调试程序
* “2”
被调试易程序运行完毕

子程序名	返回值类型	公开	备 注
数组_是否存在	逻辑型
参数名	类 型	参考	可空	数组	备 注
数组	文本型
值	文本型

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (取数组成员数 (数组), i)
如果真 (数组 [i] ＝ 值)
返回 (真)

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

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 b, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> a ＝ { “3”, “1”, “2”, “4” }<br /> b ＝ { “1”, “3”, “4” }<br /> <br /> .计次循环首 (取数组成员数 (a), i)<br />     .如果真 (数组_是否存在 (b, a <i>) ＝ 假)<br />         调试输出 (a <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 开始运行被调试程序<br /> * “2”<br /> 被调试易程序运行完毕<br /> <br /> <br /> <br /> <br /> .子程序 数组_是否存在, 逻辑型, 公开<br /> .参数 数组, 文本型, 数组<br /> .参数 值, 文本型<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (数组), i)<br />     .如果真 (数组 <i> ＝ 值)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)

bttp0059

  

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

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

数组1 ＝ { “3”, “1”, “2”, “4” }
数组2 ＝ { “1”, “3”, “4” }
变量循环首 (取数组成员数 (数组1), 1, -1, i)
计次循环首 (取数组成员数 (数组2), j)
如果真 (数组2 [j] ＝ 数组1 [i])
删除成员 (数组1, i, 1)
跳出循环 ()

计次循环尾 ()
变量循环尾 ()
调试输出 (“差异内容：”, 数组1)
' * “差异内容：” | 数组:1{“2”}

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数组1, 文本型, , "0"<br /> .局部变量 数组2, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 数组1 ＝ { “3”, “1”, “2”, “4” }<br /> <br /> 数组2 ＝ { “1”, “3”, “4” }<br /> <br /> .变量循环首 (取数组成员数 (数组1), 1, -1, i)<br />     .计次循环首 (取数组成员数 (数组2), j)<br />         .如果真 (数组2 [j] ＝ 数组1 <i>)<br />             删除成员 (数组1, i, 1)<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .变量循环尾 ()<br /> 调试输出 (“差异内容：”, 数组1)<br /> ' * “差异内容：” | 数组:1{“2”}