var n, i, a, max: integer;
begin
  readln(n);
  max:=0;
  for i:=1 to n do
  begin
    readln(a);
    if (a mod 100 = 12) and (a > max) then max:= a;
  end;
  writeln(max)
end.