($N,$K)=glob<>;
@A=<>;
for$p(0..2**$N-1){
	$%=$i=0;
	$%+=$p>>$i++&1&&$_ for@A;
	$K<$%or$x=$%>$x?$%:$x
}
print$x