main :: IO () main = print . (\d -> div d 4 * div (d + 2) 4) =<< readLn