L=gets.to_i
N=gets.to_i
s=0
p (((readline.split.map do |n| n.to_i end).sort).filter do |n| s+=n; s <= L end).length