($N,$M)=glob<>; @A=sort{$a-$b}glob<>; print"@A[0..$M-2,$N-1]"