var n,i,smax,ord,p,u,x,suma,suma1:longint;
    f,g:text;
begin
assign(f,'ssm.in');
assign(g,'ssm.out');
reset(f);
rewrite(g);
read(f,n,x);

smax:=x;p:=1;u:=1;ord:=1;
suma:=x; suma1:=x;
for i:=2 to n do
    begin
    read(f,x);
    suma:=x;

    if suma1<0 then ord:=i;
    if suma<=(suma1+x) then suma:=suma1+x;
    if smax<suma then
       begin
       smax:=suma; p:=ord;
       u:=i;
       end;
    suma1:=suma;
    end;
write(g,smax,' ');
write(g,p,' ',u);
close(f);
close(g);
end.