var n,m,s,i,j,x,y,sum:longint;
    a:array[1..6000000] of longint;
    
begin
  assign(input,'ssm.in');
  assign(output,'ssm.out');
  reset(input);
  rewrite(output);
  read(n);
  s:=0;
  sum:=0;
  for i:=1 to n do begin
    read(m);
    if s<0 then begin
      s:=m;
      j:=i
    end else 
      s:=s+m;
    if sum<s then begin
      sum:=s;
      x:=j;
      y:=i;
    end;
  end;
  write(sum,' ',x,' ',y);
end.