春休みに入ったのでHaskellの勉強を始めようと思う。 タプルで指定した回数yasuhisaを出力させる main = do putStr $ unlines $ map concat $ map nTimesExpand [1,3,2,5] nTimesExpand :: Int -> [String] nTimesExpand times = replicate times "yasuhisa …