program subsecventa_de_suma_maxima;
  var a:array[1..6000000]of longint;
      buf:array[1..100000]of byte;
      n,i,min,smax,l,r,pozmin:longint;

begin
  assign(input,'ssm.in');
  reset(input);
  settextbuf(input,buf);
  assign(output,'ssm.out');
  rewrite(output);
  readln(n);
  read(a[1]);smax:=a[1];l:=1;r:=1;
  for i:=2 to n do
    begin
      read(a[i]);
      a[i]:=a[i]+a[i-1];
      if a[i]<min then begin min:=a[i]; pozmin:=i; end;
      if a[i]-min>smax then begin smax:=a[i]-min; l:=pozmin+1;r:=i;end;
    end;
  writeln(smax,' ',l,' ',r);
  close(input);close(output);
end.