program prob66
    implicit none
    integer :: a,b
    read(*,*) a,b
    a = mod(a+11,13)
    b = mod(b+11,13)
    if(a > b) then
        write(*,*) "Alice"
    else if(a == b) then
        write(*,*) "Draw"
    else
        write(*,*) "Bob"
    end if

    stop
contains
end program prob66