uses crt;
var a:array[1..10000] of longint;
i,j,n,t:word;
tam,min,max:longint;
begin
clrscr;
readln(n);
for i:=1 to n do read(a[i]);
readln;
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then
begin
tam:=a[i];
a[i]:=a[j];
a[j]:=tam;
end;
i:=1;min:=a[1];
while (min=a[i]) and (i<>n) do
begin
inc(i);
if a[i]<>a[i-1] then
inc(min);
end;
t:=n;
max:=a[n];
while (max=a[n]) and (n<>1) do
begin
dec(n);
if a[n]<>a[n+1] then
dec(max);
end;
if (min=a[t]) and (max=a[1]) then writeln('')
else
if max=min then writeln(max)
else
if max>min then writeln(min,' ',max)
else writeln(max,' ',min);
readln;
end.