|
program zjh;varn,i,x:longint;f,g:array[1..100]of boolean;beginreadln(n);fillchar(f,sizeof(f),false);for i:=1 to n dobeginread(x);f[x]:=true;end;fillchar(g,sizeof(g),false);for i:=1 to n dobeginread(x);g[x]:=true;end;for i:=1 to 100 doif g and(not f) thenwrite(i,' ');writeln;for i... |
