Program secv_max;
var fi,fo:text;
    i,n,j1,j2,max,sum,x,poz:longint;

begin
    assign(fi,'ssm.in'); reset(fi); readln(fi,n);
    assign(fo,'ssm.out'); rewrite(fo);
    max:=-2147483648; sum:=0;

    for i:=1 to n do begin
                     read(fi,x);
                     if sum<0 then begin sum:=x; j1:=i; end
                              else sum:=sum+x;
                     if max<sum then begin max:=sum; poz:=j1; j2:=i; end;
                     end;
    write(fo,max,' ',poz,' ',j2);
    close(fi); close(fo);
end.