main = do
    [a_, b_] <- return . map read . words =<< getLine
    let
	point 1 = 13
	point 2 = 1
	point 3 = 2
	point 4 = 3
	point 5 = 4
	point 6 = 5
	point 7 = 6
	point 8 = 7
	point 9 = 8
	point 10 = 9
	point 11 = 10
	point 12 = 11
	point 13 = 12
    putStr $ if point a_ > point b_
	then "Alice"
	else if point a_ == point b_
	    then "Draw"
	    else "Bob"
