n,d,K,*x=$<.read.split.map &:to_i
m=[0,0,0]
c=x[0],h=x[d]
x.each_with_index{|a,j|
  f=[j+d,n].min
  next if a>c&&x[f]<x[h]
  x[j+1..f].each_with_index{|b,k|
    v=b-a
    v>m[0]&&m=[v,j,k+j+1]
  }
  h=f
  c=a
}
m[0]<1?p(0):puts(m[0]*K,m[1,2]*' ')