import Text.Printf (printf)

binom :: Integral a => a -> a -> a
binom n k = product [k + 1 .. n] `div` product [1 .. n - k]

computeNum :: Integral a => a -> a
computeNum = binom 31

computeSum :: Integral a => a -> a
computeSum x
    | x == 0 = 0
    | otherwise = (2 ^ 31 - 1) * binom 30 (x - 1)

main :: IO ()
main = do
    x <- readLn :: IO Integer
    printf "%Ld %Ld\n" (computeNum x) (computeSum x)