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);
 imax:=1;
 imin:=1;
 smin:=maxlongint;
 smax:=-maxlongint;
 for i:=1 to n do begin
  read(x);
  s:=s+x;
  if s<smin then begin
   smin:=s;
   imin:=i;
  end;
  if (s>smax) and (i>imax) then begin
   smax:=s;
   imax:=i;
  end;
 end;
 writeln(smax-smin,' ',imin+1,' ',imax);
close(input);
close(output);
end.