var n,i,j,sum,imax,jmax,smax,x,v:longint;
    bufin:array[1..65000]of byte;
 
begin
  assign(input,'ssm.in'); reset(input);
  assign(output,'ssm.out'); rewrite(output);
  settextbuf(input,bufin);
 
  readln(n);
  read(sum); i := 1 ; imax := 1; jmax := 1; smax := sum;
 
  for j := 2 to n do
  begin
    read(x);
    v := sum+x;
 
    if x > v then
    begin
      sum := x;
      i := j;
    end
    else
      sum := v;
 
    if smax < sum then begin smax := sum; imax := i; jmax := j; end;
  end;
 
  writeln(smax,' ',imax,' ',jmax);
 
 
  close(input);
  close(output);
end.