const fi='DAYINC.INP';
   fo='DAYINC.OUT';
var n,i,j,max,cs:longint; a,l:array[0..1000]of longint;
begin
   assign(input,fi);reset(input);
   assign(output,fo);rewrite(output);
      readln(n);
      for i:=1 to n do read(a[i]);
      for i:=n downto 1 do
         begin
            l[i]:=1;
            for j:=i+1 to n do
               if(a[j]>a[i])and(l[i]<l[j]+1)then l[i]:=l[j]+1;
            if l[i]>max then max:=l[i];
      end;
      write(max,' ');
      for i:=1 to n do
         if l[i]>cs then cs:=i;
      write(cs);
   close(output);
   close(input);
end.

program bai_giai;
var f,g:text;
    A,D:array[1..10000] of integer;
    n,i,max,vt,bd:integer;
begin
    Assign(f,'DAYINC.INP');  reset(f);
    Assign(g,'DAYINC.OUT');  rewrite(g);
    readln(f,n);
    for i:=1 to n do read(f,A[i]);
    vt:=1; D[1]:=1;  bd:=1;  max:=1;
    for i:=2 to n do
        if A[i]>=A[i-1] then D[i]:=D[i-1]+1
        else
            begin
                if D[i-1]>max then
                    begin
                        vt:=bd;  max:=D[i-1];
                    end;
                bd:=i; D[i]:=1;
            end;
    writeln(g,max,' ',vt);
    close(F); close(g);
end.