7 lines
121 B
Haskell
7 lines
121 B
Haskell
import Control.Monad
|
|
|
|
main = do
|
|
forM_ [1..5] $ \i -> do
|
|
forM_ [1..i] $ \j -> do
|
|
putChar '*'
|
|
putChar '\n'
|