import Control.Applicative

main = do
  [a, b, c] <- map read . words <$> getLine
  putStrLn $ solve a b c

solve :: Int -> Int -> Int -> String
solve a b c 
  | b >= c    = "delicious"
  | a+b >= c  = "safe"
  | otherwise = "dangerous"