var i,j,n,b,x,max,incepe,l,maxi,maxl:longint;
    t:text;
begin
b:=-2000000001;
max:=b;
assign(t,'ssm.in'); reset(t);
readln(t,n);
for i:=1 to n do
begin
  read(t,x);
  if (b<0) then
    begin
      b:=x;
      incepe:=i;
    end
  else
      b:=b+x;
  if ((max<b) )  then
    begin
      max:=b;
      maxi:=incepe;
      maxl:=i;
    end;
end;
assign(t,'ssm.out'); rewrite(t);
write(t,max,' ',maxi,' ',maxl);
close(t);
end.