(Sage)[6*fibonacci(n)*fibonacci(n+1)+(-1)^n表示n在(0..30)中]
(Maxima)makelist(6*fib(n)*fib(n+1)+(-1)^n,n,0,30);
(岩浆)[0..30]]中的[6*斐波那契(n)*斐波纳契(n+1)+(-1)^n:n;
(PARI)用于(n=0,30,print1(6*fibonacci(n)*fiboanacci(n+1)+(-1)^n“,”));
(PARI)a(n)=圆形((2^(-n)*(-(-2)^n-3*(3-sqrt(5))^n*(-1+sqrt\\科林·巴克2016年9月28日
(PARI)Vec((1+3*x+x^2)/((1+x)*(1-3*x+x^2))+O(x^30))\\科林·巴克2016年9月28日