a, b, c = gets.split.map(&:to_i)
K = gets.to_i
cnt = 0
while true do
  if b <= a
    b *= 2
    cnt += 1
  else
    break
  end
end

while true do
  if c <= b
    c *= 2
    cnt += 1
  else
    break
  end
end
puts cnt <= K ? "Yes" : "No"