17:45ごろ帰りました。
http://ja.doukaku.org/8/より。 Haskellの場合。 module Main (main) where pyramid :: Int -> [String] pyramid n = [(replicate (n - i) ' ' ++ replicate (i * 2 - 1) '*') | i <- [1 .. n]] main :: IO () main = putStr $ unlines $ pyramid 4 -- => *…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。