var
  a : array [1..10] of longint;
  i,max,num : longint;
begin
  for i:=1 to 10 do readln(a[i]);
  max:=a[1];
  num:=1;
  for i:=2 to 10 do
    if a[i]>max then
      begin
        max:=a[i];
        num:=i;
      end;
  writeln(max);
  writeln(num);
end.