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