Public Class Program
  Shared Sub Main()
    Dim nm As Long() = Array.ConvertAll(Of String, Long)(Console.ReadLine().Split(" "), AddressOf Long.Parse)
    Dim n As Long = nm(0)
    Dim m As Long = nm(1)
    Dim a As Long() = Array.ConvertAll(Of String, Long)(Console.ReadLine().Split(" "), AddressOf Long.Parse)
    Array.Sort(a)   
    Array.Reverse(a)
    For i As Long = 1 To m
      a(0) = a(0) \ 2
      Array.Sort(a)   
      Array.Reverse(a)
    Next
    Dim ans As Long = 0
    For i As Long = 0 To n - 1
      ans += a(i)
    Next
    Console.WriteLine(ans.ToString())
  End Sub
End Class