import Control.Applicative
import Control.Monad

solver :: Int -> Int
solver n
    | odd n     = (n `div` 2) * ((n `div` 2) + 1)
    | otherwise = (n `div` 2)^2

main :: IO ()
main = getLine >>= (print . solver . read) 
