Question

易语言怎么在3组数字中找到相同的数字

有三组数字，例如：第一组：1，5，11 ，46, 82、第二组：1, 5，8,12,33,70、第三组2 , 5 , 7。每组中都有“5”，输入任意三组数字，怎么直接找到共有的数字呢，都是100以内的整数。求大神帮忙，大菜鸟一个，最好有源码学习一下，谢谢！！

Answer 1

（楼上的代码需要再改改）我也给一份...希望能帮到您O(∩_∩)O~
请新建一个控制台程序，置入以下代码：
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
.版本 2
.支持库 spec

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 交集1, 整数型, , "0"
.局部变量 交集2, 整数型, , "0"
.局部变量 返回值, 文本型
.局部变量 计次, 整数型
.局部变量 a, 整数型, , "0"
.局部变量 b, 整数型, , "0"
.局部变量 c, 整数型, , "0"

标准输出 (, “请输入第一组的几个数(请用单个空格分开)：”) ' 取值
文本数组到整数 (分割文本 (标准输入 (), 取空白文本 (1), ), a)
标准输出 (, “请输入第二组的几个数(请用单个空格分开)：”)
文本数组到整数 (分割文本 (标准输入 (), 取空白文本 (1), ), b)
标准输出 (, “请输入第三组的几个数(请用单个空格分开)：”)
文本数组到整数 (分割文本 (标准输入 (), 取空白文本 (1), ), c)
调试输出 (a)
调试输出 (b)
调试输出 (c)
取交集 (a, b, 交集1) ' 即a∩b
取交集 (交集1, c, 交集2) ' 即（a∩b）∩c
.计次循环首 (取数组成员数 (交集2), 计次)
返回值 ＝ 返回值 ＋ 到文本 (交集2 [计次]) ＋ “ ”
.计次循环尾 ()
标准输出 (, “公共的数字是：” ＋ 返回值)
标准输入 ()
返回 (0) ' 可以根据您的需要返回任意数值

.子程序 取交集
.参数 数组1, 整数型, 数组
.参数 数组2, 整数型, 数组
.参数 存放数组, 整数型, 参考 数组
.局部变量 计次1, 整数型
.局部变量 计次2, 整数型

.计次循环首 (取数组成员数 (数组1), 计次1)
.计次循环首 (取数组成员数 (数组2), 计次2)
.判断开始 (数组1 [计次1] ＝ 数组2 [计次2])
加入成员 (存放数组, 数组1 [计次1])
.默认

.判断结束

.计次循环尾 ()
.计次循环尾 ()

.子程序 文本数组到整数
.参数 文本数组, 文本型, 数组
.参数 存放的整型数组, 整数型, 参考 数组
.局部变量 计次, 整数型

.计次循环首 (取数组成员数 (文本数组), 计次)
加入成员 (存放的整型数组, 到整数 (文本数组 [计次]))
.计次循环尾 ()

追问

你发给我吧，运行不了，谢谢！！

追答

我这里发不了附件，要不用QQ发吧？Q：1139032564
ps：刚刚改过了（变量没复制上）

Answer 2

提出第1组的数和第2组比较，有一样的就再和第3组比，有一样的保留，没有就丢掉继续

追问

运行不了，把你做的下载一下好吗？谢谢！！！