main :: IO () main = readLn >>= print . (\n -> (n `div` 2 + 1) * (n `div` 2 + n `mod` 2 + 1) - 1)