{-# LANGUAGE MultiWayIf #-}

import Data.List

main :: IO ()
main = do
  [x,a,b] <- fmap (map read . words) getLine :: IO [Int]
  putStrLn $ if | b <= a     -> "delicious"
                | b <= x + a -> "safe"
                | otherwise  -> "dangerous"
