\text{CODE}

uses crt;
var i, n, val, pos, a: longint;
begin
    clrscr;
    readln(n);
    read(val); pos:=1;
    for i:=2 to n do begin
        read(a);
        if a > val then begin
            val:=a;
            pos:=i;
        end;
    end;
    writeln(val, #13#10, pos);
readln;
end.

Uses crt;
Var n,i,max,a,vt: longint;

begin
    read(n); max:= -1;
    For i:= 1 to n do
        begin
            read(a);
            If max < a then 
                begin
                    max:= a;
                    vt:= i;
                end;
        end;
    writeln(max);
    write(vt);
end.