Multifactorial: Difference between revisions

Content added Content deleted

Inline

@@ Line 268: / Line 268: @@
 =={{header|Arturo}}==
+<lang rebol>multifact: function [n deg][
+	if? n =< deg -> n
-{{trans|Nim}}
+	else -> n * multifact n-deg deg
+]
-<lang arturo>multifact: @(n deg){
-	if n <= deg { n } {
+loop 1..5 'i [
-		n * [multifact n-deg deg]
+	prints ["Degree" i ":"]
-	}
+	loop 1..10 'j [
-}
+		prints [multifact j i " "]
+	]
-loop 1..5 @(i){
-	prints "Degree " + i + ": "
-	loop 1..10 @(j){
-		prints [multifact j i] + " "
-	}
 	print ""
+]</lang>
-}
-</lang>
 {{out}}
-<pre>Degree 1: 1 2 6 24 120 720 5040 40320 362880 3628800
+<pre>Degree 1 : 1   2   6   24   120   720   5040   40320   362880   3628800
-Degree 2: 1 2 3 8 15 48 105 384 945 3840
+Degree 2 : 1   2   3   8   15   48   105   384   945   3840
-Degree 3: 1 2 3 4 10 18 28 80 162 280
+Degree 3 : 1   2   3   4   10   18   28   80   162   280
-Degree 4: 1 2 3 4 5 12 21 32 45 120
+Degree 4 : 1   2   3   4   5   12   21   32   45   120
-Degree 5: 1 2 3 4 5 6 14 24 36 50 </pre>
+Degree 5 : 1   2   3   4   5   6   14   24   36   50</pre>
 =={{header|AutoHotkey}}==