import Control.Applicative

main :: IO ()
main = solve <$> readLn >>= putStrLn

solve :: Int -> String
solve x = unwords . map show $ [comb 31 x, comb 30 (x-1) * 2147483647]

comb n m = product (take m [n, n-1 ..]) `div` product [1..m]