import Control.Monad main :: IO () main = do t <- readLn replicateM_ t $ do n <- readLn let ans = solve n print ans solve :: Int -> Int solve n | odd n = 0 | True = div (n * (n-2)) 2