Initial data commit

Task/Loops-For/Haskell/loops-for-1.hs

@@ -0,0 +1,7 @@
+import Control.Monad
+
+main = do
+  forM_ [1..5] $ \i -> do
+    forM_ [1..i] $ \j -> do
+      putChar '*'
+    putChar '\n'

Task/Loops-For/Haskell/loops-for-2.hs

@@ -0,0 +1,3 @@
+import Data.List (inits)
+
+main = mapM_ putStrLn $ tail $ inits $ replicate 5 '*'

Task/Loops-For/Haskell/loops-for-3.hs

@@ -0,0 +1 @@
+putStrLn $ unlines [replicate n '*' | n <- [1..5]]

Task/Loops-For/Haskell/loops-for-4.hs

@@ -0,0 +1 @@
+putStrLn . unlines . take 5 $ iterate ('*':) "*"