Anonymous user
Factorial: Difference between revisions
added MiniZinc
Puppydrum64 (talk | contribs) m (→{{header|68000 Assembly}}: factorial function no longer clobbers D1) |
(added MiniZinc) |
||
Line 5,828:
{{out}}
<pre>3628800</pre>
=={{header|MiniZinc}}==
<lang MiniZinc>var int: factorial(int: n) =
let {
array[0..n] of var int: factorial;
constraint forall(a in 0..n)(if (a == 0) then factorial[a] == 1 else factorial[a] = a*factorial[a-1] endif) } in factorial[n];
var int: fac = factorial(6);
solve satisfy;
output [show(fac),"\n"];</lang>
=={{header|MIPS Assembly}}==
=== Iterative ===
| |||