pascal集合中找数

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/08/29 23:14:19

pascal集合中找数
描述
有2个整数数列A,B,每个数列包含n个数（0到100之间,不会重复）,编写程序完成下列要求：①找出在B中出现而在A中没有出现的那些数,并输出.②找出在B中出现而在A中也出现的那些数,并输出.
输入格式
第一行 n 第二行数列A第三行数列B
输出格式
第一行,在B中出现而在A中没有出现的那些数第二行,在B中出现而在A中也出现的那些数
样例输入
5
12 25 23 22 13
10 23 11 9 25
样例输出
9 10 11
23 25

program zjh;
var
n,i,x:longint;
f,g:array[1..100]of boolean;
begin
readln(n);
fillchar(f,sizeof(f),false);
for i:=1 to n do begin
read(x);
f[x]:=true;
end;
fillchar(g,sizeof(g),false);
for i:=1 to n do begin
read(x);
g[x]:=true;
end;
for i:=1 to 100 do
if g[i] and(not f[i]) then
write(i,' ');
writeln;
for i:=1 to 100 do
if f[i] and g[i] then
write(i,' ');
writeln;
end.

pascal pascal pascal! pascal语言编写一个算法实现两个集合的差运算 pascal中判断集合中元素个数的方法或函数, Free Pascal Pascal 是什么 pascal随机数 Pascal是什么用pascal 语言编写一个程序读入一系列字符,将它们分别放在英文字母、数字、其他符号三个集合中 free pascal问题：用集合做：输入一组数,程序判断出最大和的连续4个数和最小和的连续4个数 pascal里关于集合和记录的问题..口袋中有红黄蓝白黑5种颜色的5只小球,每次从口袋里取出3只球,问 Pascal 也分 Turbo Pascal 和 Free Pascal 的求pascal高手.pascal中的if语句.