n=gets.to_i
gets
a=gets.split.map(&:to_i).sort
p$$.times.reduce(0){|s,i|break(i)if s<n;s+a[i]}