module Main where main :: IO () main = readLn >>= print . solve solve :: Integer -> Integer solve n = pow' 6 $ n `div` 2 pow' :: Integer -> Integer -> Integer pow' a b = f a b 1 where f _ 0 acc = acc f a b acc = f a (b-1) $ acc * a `mod` 998244353