Initial data commit

Task/Loops-For/Common-Lisp/loops-for-1.lisp

@@ -0,0 +1,4 @@
+(loop for i from 1 upto 5 do
+  (loop for j from 1 upto i do
+    (write-char #\*))
+  (terpri))

Task/Loops-For/Common-Lisp/loops-for-2.lisp

@@ -0,0 +1,4 @@
+(dotimes (i 5)
+  (dotimes (j (+ i 1))
+    (write-char #\*))
+  (terpri))

Task/Loops-For/Common-Lisp/loops-for-3.lisp

@@ -0,0 +1,6 @@
+(do ((i 1 (+ i 1)))
+    ((> i 5))
+  (do ((j 1 (+ j 1)))
+      ((> j i))
+    (write-char #\*))
+  (terpri))

Task/Loops-For/Common-Lisp/loops-for-4.lisp

@@ -0,0 +1,7 @@
+(use-package :iterate)
+(iter
+  (for i from 1 to 5)
+    (iter
+      (for j from 1 to i)
+      (princ #\*))
+    (terpri))