program subsir_maximal_dinamic;{de pe infoarena 40puncte}
type sume=array[1..6000000] of int64;
var

i,si,sj,pozi,j,nr,pozj,pozfi,pozfj,summax:longint;

   n:longint;
   f,g : text;
s:sume;
procedure dinamica;
var i:integer;
begin
  assign(f,'ssm.in');
  reset(f);
  assign(g,'ssm.out');
  rewrite(g);
  readln(f,n);
  read(f,nr);
  s[1]:=nr;
  for i:=2 to n do
   begin
     read(f,nr);
     s[i]:=s[i-1] +nr;
     for j:=1 to i-1 do
       begin
          if  summax<s[i]-s[j-1] then
                begin
                   summax:=s[i]-s[j-1];
                   pozfj:=j;
                   pozfi:=i;
                end;
       end;
     end;
  write(g,summax,' ',pozfj,' ',pozfi);
  close(f);
  close(g);
end;
begin
 dinamica;
end.