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