program pascal;
var f,g:text;
    n,i,k,x,pi,ps,max:longint;
begin
assign(f,'secventa.in'); reset(f);
assign(g,'secventa.out'); rewrite(g);
max:=-30001;
read(f,n,k);
for i:=1 to n do
   begin
     read(f,x);
     if i<=n-k+1 then
            if x>max then
                   begin
                     max:=x;
                     pi:=i;
                     ps:=i+k-1;
                   end;
   end;
write(g,pi,' ',ps,' ',max);
close(f);
close(g);
end.