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]
  where 

comb n m | m == 0 = 1
         | n > 2*m = comb n (n-m)
         | otherwise = comb (n-1) (m-1) * n `div` m