l = gets.to_i n = gets.to_i w = gets.split.map(&:to_i).sort ans = 0 w.each{|t| if l>=t l-=t ans+=1 end } p ans