program sub_max;
const fi='ssm.in';
      fo='ssm.out';
var a,idx,beg,en,n,s,s1:int64;
buf:array[0..6000000] of byte;
i:longint;
f,g:text;
begin
assign(f,fi);
reset(f);
assign(g,fo);
rewrite(g);
settextbuf(f,buf);
read(f,n);
s:=0;
a:=-maxlongint;
for i:=1 to n do
begin
read(f,s1);
if s<0 then
begin
   s:=0;
   idx:=i;
end;
s:=s+s1;
if a<s then
  begin
  a:=s;
  beg:=idx;
  en:=i;
  end;
end;
write(g,a,' ',beg,' ',en);
close(f);
close(g);
end.