(ssl1957)2009年东莞市信息学特长生测试题 惊人的记忆力

2009年东莞市信息学特长生测试题 惊人的记忆力

Description

　　希望中学的小明非常聪明，记忆力非常的好，可以达到过目不忘的程度，你任意给他一列数，他可以很快的按从小到大的顺序说出来。现在小A为了考考小明，任意给小明两列数，要求他将这两个数列中的数合并成一个数列，按从小到大的顺序说出这些数，相同的数只保留一个。现在也请你编程序来解决这个问题。

Input

　　从文件a.in中读入数据，第一行是一个正整数N，表示第一个数列有N个整数，第二行是第一个数列的N个整数，第三行是一个正整数M，表示第二个数列有M个整数，第四行是第二个数列的M个整数。

Output

　　结果输出到a.out中，只有一行，就是这两个数列的数合并成一个数列后按从小到大输出的结果，相同的数只输出一次。

Sample Input

5
12　17 19 34 20
7　
19　30 12 50 20 55 17

Sample Output

12 17 19 20 30 34 50 55

Hint

1=< N,M <= 10000, 两个数列中的数x都是整数，且符合条件: -1000 = < x <= 1000

Source

elba

题解：

   本题很水。因为相同的数只用输出一次，一个桶排即可

var
 v:array[-1000..1000]of boolean;//桶
 n,i,x:longint;
procedure main;
begin
 read(n);
 for i:=1 to n do
  begin
   read(x);
   v[x]:=true;
  end;
end;
begin
 main;
 main;
 for i:=-1000 to 1000 do
  if v[i] then write(i,' ');
end.