loj2409. 「THUPC 2017」小 L 的计算题 / Sum

题意：

$$f_k=\sum _{i=1}^n{a}_i^k$$
求出$f_1$~$f_n$

题解：

考虑构造$f$的生成函数$F$
设$A(x)={\sum }_j{a}_i^j{x}^j$
则$F(x)={\sum }_i^{n}A(i)$
$F$的系数即是${\sum }_{i=1}^n{a}_i^k$
所以有$F(x)={\sum }_{i=1}^n\frac{1}{1-a_{i}x}$
这样就可以分治fft+多项式求逆$O(nlo{g}^{2}n)$
然而常数巨大无法AC
接下来的操作就很奇奇妙妙
$$=\sum _{i=1}^{n}1+\frac{a_{i}x}{1-a_{i}x}$$

$$=n-x\sum _{i=1}^n\frac{-a_i}{1-a_{i}x}$$

$$=n-x\sum _{i=1}^n[ln(1-a_{i}x){]}^{\prime }$$

$$=n-x{\left[\sum _{i=1}^{n}ln(1-a_{i}x)\right]}^{\prime }$$

$$=n-x{\left\{ln\left[\prod _{i=1}^n(1-a_{i}x)\right]\right\}}^{\prime }$$
用分治求这个式子就快很多，然后再求$ln$，求导即可
听说是套路，自闭
code：

#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<iostream>
#define mem(x) memset(x,0,sizeof(x))
#define LL long long
using namespace std;
const LL p=998244353,yg=3;
LL bin[1600010],a[1600010],g[1600010],h[1600010],tmp[1600010],b[1600010];
LL Pow(LL a,LL b)
{
	LL ans=1;
	while(b)
	{
		if(b&1) ans=ans*a%p;
		a=a*a%p;b>>=1;
	}
	return ans;
}
void ntt(LL *a,LL n,LL op)
{
	for(LL i=0;i<n;i++) bin[i]=(bin[i>>1]>>1)|((i&1)*(n>>1));
	for(LL i=0;i<n;i++) if(i<bin[i]) swap(a[i],a[bin[i]]);
	for(LL i=1;i<n;i<<=1)
	{
		LL wn=Pow(yg,op==1?(p-1)/(i<<1):p-1-(p-1)/(i<<1)),t,w;
		for(LL j=0;j<n;j+=i<<1)
		{
			w=1;
			for(LL k=0;k<i;k++)
			{
				t=a[i+j+k]*w%p;w=wn*w%p;
				a[i+j+k]=(a[j+k]-t)%p;a[j+k]=(a[j+k]+t)%p;
			}
		}
	}
	if(op==-1)
	{
		LL Inv=Pow(n,p-2);
		for(LL i=0;i<n;i++) a[i]=a[i]*Inv%p;
	}
}
void pol_inv(LL n,LL *a,LL *g)
{
	if(n==1) {g[0]=Pow(a[0],p-2);return;}
	pol_inv((n+1)>>1,a,g);
	LL N=1;while(N<n<<1) N<<=1;
	copy(a,a+n,tmp);fill(tmp+n,tmp+N,0);
	ntt(g,N,1);ntt(tmp,N,1);
	for(LL i=0;i<N;i++) g[i]=(2-tmp[i]*g[i]%p)*g[i]%p;
	ntt(g,N,-1);fill(g+n,g+N,0);
}
void pol_ln(LL n,LL *a,LL *h)
{
	LL N=1;while(N<n<<1) N<<=1;
	fill(g,g+N,0);pol_inv(n,a,g);
	for(LL i=0;i<n;i++) h[i]=a[i+1]*(i+1)%p;
	fill(h+n,h+N,0);ntt(g,N,1);ntt(h,N,1);
	for(LL i=0;i<N;i++) h[i]=h[i]*g[i]%p;
	ntt(h,N,-1);
	for(LL i=n-1;i>=1;i--) h[i]=h[i-1]*Pow(i,p-2)%p;
	fill(h+n,h+N,0);
}
LL n,c[400010];
void solve(LL l,LL r,LL N)
{
	if(l==r) {c[l]=-c[l];return;}
	LL mid=(l+r)/2;
	solve(l,mid,N>>1);solve(mid+1,r,N>>1);
	a[0]=b[0]=1;
	for(int i=1;i<N;i++) a[i]=b[i]=0;
	for(LL i=l;i<=mid;i++) a[i-l+1]=c[i];
	for(LL i=mid+1;i<=r;i++) b[i-mid]=c[i];
	ntt(a,N,1);ntt(b,N,1);
	for(int i=0;i<N;i++) a[i]=a[i]*b[i]%p;
	ntt(a,N,-1);
	for(LL i=l;i<=r;i++) c[i]=a[i-l+1];
}
LL read()
{
	char ch;
	while(!isdigit(ch=getchar()));
	LL x=ch-48;
	while(isdigit(ch=getchar())) x=x*10+ch-48;
	return x;
}
int main()
{
	LL T=read();
	while(T--)
	{
		n=read();
		for(LL i=1;i<=n;i++) c[i]=read();
		LL N=1;while(N<(n+1)<<1) N<<=1;
		solve(1,n,N);
		mem(a);a[0]=1;for(int i=1;i<=n;i++) a[i]=c[i];
		pol_ln(n+1,a,h);for(LL i=0;i<=n;i++) h[i]=h[i+1]*(i+1)%p;
		for(int i=n+1;i>=1;i--) h[i]=-h[i-1];h[0]=n;
		LL ans=0;for(LL i=1;i<=n;i++) ans^=(h[i]+p)%p;
		printf("%lld\n",ans);
	}
}