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