_, m = gets.split.map(&:to_i)
a = gets.split.map(&:to_i)
aa = a.sort
while m > 0
  x = aa.pop / 2
  i = aa.bsearch_index{|n| x <= n}
  aa = i ? aa[0, i] + [x] + aa[i..-1] : [x]
  m -= 1
end
puts aa.inject(:+)
