local mmi, mma = math.min, math.max
local mfl, mce = math.floor, math.ceil
local n, x, m = io.read("*n", "*n", "*n")
local a = {}
for i = 1, n do
  a[i] = io.read("*n")
end
local z = 0
for i = 1, n do
  local c = 0
  while x <= a[i] do
    a[i] = mfl(a[i] / 2)
    c = c + 1
  end
  c = c * i
  z = mma(z, c)
end
print(z <= m and "Yes" or "No")