main = do
    n <- readLn
    let half = n `div` 2
    print $ (half + 1) * (n - half + 1) - 1