var suma,smax,i,pi,ps,n,a,cont:longint;
begin
assign(input,'ssm.in');
reset(input);
read (input,n);
read (input,smax);
smax:=-maxlongint;
suma:=0;
cont:=0;
for i:=2 to n do begin
read (input,a);
suma:=suma+a;
if suma>=0 then
inc(cont);
if suma>smax then begin
pi:=i-cont+1;
smax:=suma;
ps:=i;
end;
if suma<0 then
begin
suma:=0;
cont:=0;
end;
end;
close(input);
assign(output,'ssm.out');
rewrite(output);
if smax>0 then
write(output,smax,' ',pi,' ',ps)
else
write(output,smax,' ',pi-1,' ',ps);
close(output);
end.