l, n = read_line.split.map(&.to_i)
w = Array.new(n) { read_line.to_i }

w.sort!

t = 0
result = n

w.each_with_index do |weight, i|
  t += weight
  if t > l
    result = i
    break
  end
end

puts result