program main
    use,intrinsic :: iso_fortran_env
    implicit none
    integer(int32):: a,b,c,k

    read*, a,b,c
    read*, k

    do while(b <= a)
        b=b*2
        k=k-1
    end do

    do while(c <= b)
        c=c*2
        k=k-1
    end do

    if (k < 0) then
        print'(a)', "No"
    else
        print'(a)', "Yes"
    end if
end program main