minddnim

using System;
using System.Linq;

namespace ConsoleApp1
{
    class TestCase
    {
        public int A { get; } = 0;
        public int B { get; } = 0;
        public TestCase(int a, int b)

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import qualified Data.Set as S

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [c, _, v] <- map read.words <$> getLine

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import qualified Data.Set as S

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [_,_,v] <- map read.words <$> getLine

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [x, r, c] <- map read . words <$> getLine
    let ans = slv x r c

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import Data.List

type Quaternion = (Integer, Integer, Integer, Integer)

i :: Quaternion
i = (0, 1, 0, 0)

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [_, a] <- words <$> getLine
    let ans = slv (zip a [1..]) (0, 0)

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import qualified Data.List as L

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [_, n] <- words <$> getLine

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import qualified Data.Vector as V

main :: IO()
main = do
  testCase <- readLn
  let tbl = createTable 100
  forM_ [1..testCase] $ \i -> do

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do
    [m, n] <- map read.words <$> getLine
    let ans = slv m n

minddnim

import Control.Monad
import Text.Printf
import Control.Applicative
import Data.Maybe
import Data.List

main :: IO()
main = do
  testCase <- readLn
  forM_ [1..testCase] $ \i -> do