L = gets.to_i
N = gets.to_i

W = (readline.split.map do |n| n.to_i end).sort

sum = 0

W = W.filter do |n|
    sum+=n
    sum <= L
end

p W.length