ZOJ 3856 Goldbach（FFT）

题意：给出一个数n，问有多少种方法用最多用三个素数之间的加或乘能得到n。

思路：fft。首先分类讨论，主要考虑三个素数相加有多少种方案，其余都比较简单。

用fft处理出某一个数由两个素数相加得到有多少种方案，然后再枚举素数即可。

#include<cstdio>
#include<cstring>
#include<cmath>
#include<cstdlib>
#include<iostream>
#include<algorithm>
#include<vector>
#include<map>
#include<queue>
#include<stack>
#include<string>
#include<map>
#include<set>
#include<ctime>
#define eps 1e-6
#define LL long long
#define pii pair<int, int>
//#pragma comment(linker, "/STACK:1024000000,1024000000")
using namespace std;

const int MAXN = 100000;
const int MOD = 1e9+7;
int n;
int vis[MAXN], cnt[MAXN];//vis[i]=1,则i是合数；vis[i]=0，则i是素数或1
LL pow_mod(LL a, LL p, LL n) {
	if(p == 0) return 1;
	LL ans = pow_mod(a, p/2, n);
	ans = ans * ans % n;
	if(p%2 == 1) ans = ans * a % n;
	return ans;
} 
//筛素数 
void sieve(int n) {
	memset(vis, 0, sizeof(vis));
	memset(cnt, 0, sizeof(cnt));
	vis[0] = vis[1] = 1;
	for(int i = 2; i <= n; i++) if(!vis[i]) {
		cnt[i] = 1;
		for(int j = i*2; j <= n; j+=i) {
			vis[j] = 1;
			int tmp = j;
			while(tmp%i == 0) {
				cnt[j]++;
				tmp /= i;
			}
		}
	}
} 
//生成素数表，放在prime数组中，返回素数个数 
const double PI = acos(-1.0);
//复数结构体
struct complex
{
    double r,i;
    complex(double _r = 0.0,double _i = 0.0)
    {
        r = _r; i = _i;
    }
    complex operator +(const complex &b)
    {
        return complex(r+b.r,i+b.i);
    }
    complex operator -(const complex &b)
    {
        return complex(r-b.r,i-b.i);
    }
    complex operator *(const complex &b)
    {
        return complex(r*b.r-i*b.i,r*b.i+i*b.r);
    }
};
/*
 * 进行FFT和IFFT前的反转变换。
 * 位置i和 （i二进制反转后位置）互换
 * len必须取2的幂
 */
void change(complex y[],int len)
{
    int i,j,k;
    for(i = 1, j = len/2;i < len-1; i++)
    {
        if(i < j)swap(y[i],y[j]);
        //交换互为小标反转的元素，i<j保证交换一次
        //i做正常的+1，j左反转类型的+1,始终保持i和j是反转的
        k = len/2;
        while( j >= k)
        {
            j -= k;
            k /= 2;
        }
        if(j < k) j += k;
    }
}
/*
 * 做FFT
 * len必须为2^k形式，
 * on==1时是DFT，on==-1时是IDFT
 */
void fft(complex y[],int len,int on)
{
    change(y,len);
    for(int h = 2; h <= len; h <<= 1)
    {
        complex wn(cos(-on*2*PI/h),sin(-on*2*PI/h));
        for(int j = 0;j < len;j+=h)
        {
            complex w(1,0);
            for(int k = j;k < j+h/2;k++)
            {
                complex u = y[k];
                complex t = w*y[k+h/2];
                y[k] = u+t;
                y[k+h/2] = u-t;
                w = w*wn;
            }
        }
    }
    if(on == -1)
        for(int i = 0;i < len;i++)
            y[i].r /= len;
}
complex x1[MAXN*4], x2[MAXN*4];
int main() {
    //freopen("input.txt", "r", stdin);
    LL inv = pow_mod(6, MOD-2, MOD);
	sieve(80010); 
	int tmp  = (80000+1)*2;
	int len = 1;
	while(len<tmp) len <<= 1;
	for(int i = 0; i <= 80000; i++) x1[i] = x2[i] = complex(vis[i]^1, 0);
	for(int i = 80000+1; i < len; i++) x1[i] = x2[i] = complex(0,0);
	fft(x1, len, 1);
	fft(x2, len, 1);
	for(int i = 0; i < len; i++) x1[i] = x1[i] * x2[i];
	fft(x1, len, -1);
	while(cin >> n) {
		LL ans = 0;
		for(int i = 2; i < n; i++) {
			if(!vis[i]) {
				ans += (int)(x1[n-i].r+0.5);
				if(i*3==n) {
					ans += 5;
					continue;
				}
				if(i*2<n && !vis[n-2*i]) ans += 2;
				if((n-i)%2==0 && !vis[(n-i)/2]) ans++;
				ans %= MOD;
			}
		}
		ans = ans * inv % MOD;
		if(cnt[n] < 4) ans++;
		for(int i = 2; i < n; i++) {
			if(i<=n-i && !vis[i] && !vis[n-i]) ans++;
			if(!vis[i] && cnt[n-i]==2) ans++;
		}
		ans %= MOD;
		cout << ans << endl;
	}
    return 0;
}