多言語でforループを列挙していくスレ

[0264 デフォルトの名無しさん 2019/03/04(月) 01:11:16.72 ID:rLTN1z0Z]

短くしてみた >>260

main = mapM_ putStrLn $ map f [1..4]
where f = ¥x -> if x<=3 then "x = " ++ show x else "x = other number"