_n, k = gets.split.map(&:to_i)
a = gets.split.map(&:to_i).sort.reverse

pos, neg = a.partition(&:positive?)

puts pos.size == 0 ? neg[0] : pos.take(k).sum