f n = div (n*(n+1)) 2

main = do
	n <- getLine
	putStrLn . show . f $ read n