n = gets.strip.split.map(&:to_i)
k = gets.to_i

k.times do |i|
  if n[0] > n[1]
    x = n[1]
    x = x*2
    n[1] = x
  elsif n[1] > n[2]
    x = n[2]
    x = x*2
    n[2] = x
  end
  if n[0] < n[1] && n[1] < n[2]
    puts "Yes"
    exit
  end
end

puts "No"
  