main :: IO ()
main = do
  d <- readLn :: IO Int
  print $ (d `div` 4) * ((d + 2) `div` 4)