program pascal;
var f,g:text;
    pi,ps,i,j,n,k:longint;
    max,suma:int64;
    v:array[1..50000] of -25000..25000;
begin
assign(f,'secv2.in'); reset(f);
assign(g,'secv2.out'); rewrite(g);
readln(f,n,k);
for i:=1 to n do read(f,v[i]);

max:=-maxint;
for i:=1 to n do
  begin
    suma:=0;
    for j:=i to i+k-1 do suma:=suma+v[j]; {pun primele k numere obligatorii}
    if suma>max then
        begin
            max:=suma;
            pi:=i;
            ps:=j;
        end;
     {continui cu alte numere}
    for j:=i+k to n do
     begin
        suma:=suma+v[j];
        if suma>max then
             begin
               max:=suma;
               pi:=i;
               ps:=j;
             end;
     end;
   end;

write(g,pi,' ',ps,' ',max);
close(f);
close(g);
end.