RosettaCodeData/Task/Left-factorials/Maple/left-factorials.maple
2020-02-17 23:21:07 -08:00

4 lines
185 B
Text

left_factorial := n -> sum(k!, k = 1 .. n - 1);
seq(left_factorial(i), i = 1 .. 10);
seq(left_factorial(i), i = 20 .. 110, 10);
seq(length(left_factorial(i)), i = 1000 .. 10000, 1000);