eval"N,M="+gets.split*?,
x=gets.to_i
a=(1...N).map{gets.to_i}.sort
p a.bsearch{|y|q=a.index y;cnt=(N-2).downto(i=0).count{|j|i+=1while i<j&&(i==q||x+y>=a[i]+a[j]);j!=q&&i<j&&i+=1};cnt<M}||-1