module Main where

answer :: Int -> Int -> String
answer s w
	| s > w = "safe"
	| otherwise = "unsafe"

main :: IO ()
main = do
	input <- getLine
	let s = read . head . words $ input
	let w = read . head . tail . words $ input
	putStrLn $ answer s w

