n,k=gets.split.map(&:to_i)
aNs = gets.split.map(&:to_i).select{|v| v > 0}.sort
k = aNs.size if aNs.size < k
puts (aNs[(aNs.size-k)...aNs.size].inject(:+)).to_i