main = do
        str <- getLine
        let num = read str
        putStrLn $ show ((num*(num+1))`div`2)