n,d,k,*x=$<.read.split.map &:to_i n,d,k,*x=s.split.map &:to_i; m=[0,0,0] (0..n-=1).each{|j| (j+1..[j+d,n].min).each{|k| v=x[k]-x[j] m=[v,j,k] if v>m[0] } } if m[0]<1 p 0 else p m[0]*k puts m[1,2]*' ' end