September Morn Update

Task/Multifactorial/AWK/multifactorial.awk

@@ -0,0 +1,19 @@
+# syntax: GAWK -f MULTIFACTORIAL.AWK
+# converted from Go
+BEGIN {
+    for (k=1; k<=5; k++) {
+      printf("degree %d:",k)
+      for (n=1; n<=10; n++) {
+        printf(" %d",multi_factorial(n,k))
+      }
+      printf("\n")
+    }
+    exit(0)
+}
+function multi_factorial(n,k,  r) {
+    r = 1
+    for (; n>1; n-=k) {
+      r *= n
+    }
+    return(r)
+}