const n=10;
var
 a:array[1..n] of integer;
 i,j:integer;
 b:boolean;
begin
 for i:=1 to n do
  begin
   Write('a[',i:2,']= ');
   Readln(a[i]);
  end;
 for i:=1 to n do
  begin
   b:=true;
   for j:=1 to i-1 do
    if a[i]=a[j] then b:=false;
   for j:=i+1 to n do
    if a[i]=a[j] then b:=false;
   if b then writeln(a[i]);
  end;
 Readln;
end.