(PARI)默认值(realprecision,250);b=对数(3);对于(n=1,80,打印1(如果(n==1,楼层(b),楼层(n!*b)-n*楼层((n-1)*b) ),“,”)
(Magma)SetDefaultRealField(RealFild(250));[地板(对数(3))]cat[地板(阶乘(n)*Log(3);
(鼠尾草)
定义a(n):
如果(n==1):返回楼层(log(3))
else:返回展开(floor(factorial(n)*log(3))-n*floor
[(1..80)中n的a(n)]
|