RosettaCodeData/Task/Multifactorial/Mathematica/multifactorial.math

3 lines
108 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Multifactorial[n_, d_] := Product[x, {x, n, 1, -d}]
Table[Multifactorial[j, i], {i, 5}, {j, 10}]//TableForm