var
  uch: array [1..99] of integer;   //массив
  n, max, maxcount, maxcountprev, answer, prevansv: integer;
  i, j: integer;

begin
  readln(n);  //кол-во школ

  for i := 1 to n do    // заполнение массива
  begin
    readln(uch[i]);
  end;


  for i := 1 to n do    // вывод массива
  begin
    write(uch[i]:4);
  end;


  maxcountprev := 0;    // предыдущее макс. значение
  for i := 1 to n do    // проверка и подсчёт одинаковых значений
  begin
      max := uch[i];
      for j := 1 to n do
      begin
        if (uch[i] = uch[j] ) then maxcount := maxcount + 1;
      end;
      if (maxcount > maxcountprev) then
        begin
          answer := uch[i];
        end;
      maxcountprev := maxcount;
      maxcount := 0;
  end;
  writeln ();
  writeln(answer);
end.