main = ((show . (\n -> div (foldl (*) 1 [n+1..2*n]) (foldl (*) 1 [1..n+1])) . read) <$> getLine) >>= putStrLn