l=gets.to_i
n = gets.to_i
a=gets.split.map(&:to_i).sort
sum = 0
count = 10000
n.times{|i|
sum += a[i]
if sum > l
count = i
break
end
}
puts [count,n].min