program main
  implicit none
  integer i,A,B,C,K,ans
  read(*, *) A,B,C
  read(*, *) K
  !read(*, *) (L(i), i = 1,N)
  do
    if (A-B > -1) then
      K = K-1
      B = B*2
    else
      exit
    end if
  end do
  do
    if (B-C > -1) then
      K = K-1
      C = C*2
    else
      exit
    end if
  end do
  if (K < 0) then
    write(*, *) 'No'
  else
    write(*, *) 'Yes'
  end if
end program main
