4 lines
116 B
Text
4 lines
116 B
Text
lf(n)=sum(k=0,n-1,k!);
|
|
apply(lf, [0..10])
|
|
apply(lf, 10*[2..11])
|
|
forstep(n=1000,1e4,1000,print1(#digits(lf(n))", "))
|