(岩浆)
F: =阶乘;
p: =func<n,k|(&+[(-1)^j*F(n+k-3*j)/;
q: =func<n,k|n eq 0或k eq 0选择0 else(&+[(-1)^j*F(n+k-3*j-2)/(F(j)*F(n-2*j-1)*F;
A: =函数<n,k|p(n,k)-q(n,k)>;
[A(n-1,n+1):[1..50]]中的n//G.C.格鲁贝尔2022年10月30日
(SageMath)
f=阶乘
定义p(n,k):j在范围(1+min((n//2),(k//2)))内的返回和
定义q(n,k):j在范围(1+min(((n-1)//2),(k-1)//2))内的返回和((-1)^j*f(n+k-3*j-2)/(f(j)*f(n-2*j-1)*f
定义A(n,k):返回p(n,k)-q(n,克)
[A(n-1,n+1)代表范围(1,50)内的n]#G.C.格鲁贝尔2022年10月30日