var n:longint;
    s,i,imin,smax,imax,smin,r,x:longint;

begin
assign(input,'ssm.in');reset(input);
assign(output,'ssm.out');rewrite(output);
 readln(n);
 smin:=maxlongint;
 for i:=1 to n do begin
  read(x);
  s:=s+x;
  if s<=smin then begin
   smin:=s;
   imin:=i;
  end;
  r:=s-smin;
  if r>smax then begin
   smax:=r;
   imax:=i;
  end;
 end;
 writeln(smax,' ',imin+1,' ',imax);
close(input);
close(output);
end.