Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Multifactorial/BBC-BASIC/multifactorial.basic
+++ b/Task/Multifactorial/BBC-BASIC/multifactorial.basic
@ -0,0 +1,17 @@
+REM >multifact
+FOR i% = 1 TO 5
+  PRINT "Degree "; i%; ":";
+  FOR j% = 1 TO 10
+    PRINT " ";FNmultifact(j%, i%);
+  NEXT
+  PRINT
+NEXT
+END
+:
+DEF FNmultifact(n%, degree%)
+LOCAL i%, mfact%
+mfact% = 1
+FOR i% = n% TO 1 STEP -degree%
+  mfact% = mfact% * i%
+NEXT
+= mfact%