import qualified Data.ByteString.Char8 as B
import Data.Maybe (fromJust)
import Data.List (nub)
main = putStrLn.solve.map(fst.fromJust.B.readInt).B.words=<<B.getContents
pack2 [] = []
pack2 (x:y:xs) = [x, y]:pack2 xs
elems [as, bs] = concat.filter(\x->any(`elem`as)x&&all(`notElem`bs)x)
group _ [] = [[], []]
group xs ys = map nub.zipWith(++)t.group t.filter(all(`notElem`concat xs))$ys where t = zipWith(++)xs[elems xs ys, elems(reverse xs)ys]
winF xs = length(head xs) > length(last xs)
solve (n:xs) = if winF . group [[1], [n]] . pack2 $ xs then "Fennec" else "Snuke"
