September Morn Update

2019-09-12 10:33:56 -07:00 · 2019-09-12 10:33:56 -07:00 · aac6731f2c
commit aac6731f2c
parent 4e2d22a71d
6856 changed files with 141342 additions and 21127 deletions
--- a/Task/Fibonacci-sequence/Modula-3/fibonacci-sequence-1.mod3
+++ b/Task/Fibonacci-sequence/Modula-3/fibonacci-sequence-1.mod3
@ -0,0 +1,8 @@
+PROCEDURE Fib(n: INTEGER): INTEGER =
+  BEGIN
+    IF n < 2 THEN
+      RETURN n;
+    ELSE
+      RETURN Fib(n-1) + Fib(n-2);
+    END;
+  END Fib;