accaccacc555's blog

By accaccacc555, history, 4 years ago, In Russian

1353C - Board Moves

Возможно я не прав,но мне кажется,что наилучшими решением будет переместить все фигуры в центр доски,но по каким-то причинам это не работает...



import Control.Monad brd :: Int -> Int brd n= sum $ [8*p*p|p<-b] where b = [1..div n 2] main =do t <- fmap read getLine ns <- replicateM t (fmap read getLine) forM_ ns (print . brd)
  • Vote: I like it
  • -5
  • Vote: I do not like it