RosettaCodeData/Task/Loops-For/Haskell/loops-for-2.hs
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

3 lines
81 B
Haskell

import Data.List (inits)
main = mapM_ putStrLn $ tail $ inits $ replicate 5 '*'