main = do
  (a:b:_) <- return . (map read) . words =<< getLine
  putStrLn $ judge (f a) (f b)
  where
    f 1 = 14
    f n = n 
    judge a b
      | a == b = "Draw"
      | a > b = "Alice"
      | a < b = "Bob"
      
