RosettaCodeData/Task/Left-factorials/Maple/left-factorials.maple

5 lines
185 B
Plaintext

left_factorial := n -> add(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);