program main
    implicit none
    
    integer :: n
    
    integer :: index = 0
    integer :: xor   = 0
    
    integer :: i
    
    read *, n
    
    do i = 2, n
        index = 0
        do while (mod(n, i) == 0)
            n = n / i
            index = index + 1
        end do
        
        xor = ieor(xor, index)
    end do
    
    if (xor == 0) then
        print '(A)', "Bob"
    else
        print '(A)', "Alice"
    end if
end program main