Initial data commit

Task/Factorial/Clojure/factorial-1.clj

@@ -0,0 +1,2 @@
+(defn factorial [x]
+  (apply *' (range 2 (inc x))))

Task/Factorial/Clojure/factorial-2.clj

@@ -0,0 +1,4 @@
+(defn factorial [x]
+  (if (< x 2)
+      1
+      (*' x (factorial (dec x)))))

Task/Factorial/Clojure/factorial-3.clj

@@ -0,0 +1,6 @@
+(defn factorial [x]
+  (loop [x x
+         acc 1]
+    (if (< x 2)
+        acc
+        (recur (dec x) (*' acc x)))))

Task/Factorial/Clojure/factorial-4.clj

@@ -0,0 +1,6 @@
+(defn factorial
+  ([x] (trampoline factorial x 1))
+  ([x acc]
+   (if (< x 2)
+     acc
+     #(factorial (dec x) (*' acc x)))))