# frozen_string_literal: true

def solve
  u = A.select { _1.positive? }
  u == [] ? A.max : u.sort { _2 <=> _1 }.take(K).sum
end

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

puts solve