N, K = gets.split.map(&:to_i)
A = gets.split.map(&:to_i)

puts [0, A.sort.pop(K).select(&:positive?).sum].max