import Control.Applicative

main :: IO ()
main = do
       n <- readLn
       putStrLn $ show (264 + 52 * n)