将所有数分解质因数,那么第一问就是求指数的最大值,第二问就是$2^{指数最大的质数个数}-1$。
首先将$10^6$以内的质因数全部找到,那么剩下部分的因子$>10^6$,且只有3种情况:
1.大质数
2.大质数的平方
3.两个大质数的乘积
对于1可以用MillerRabin算法判定,对于2可以尝试开根号然后判定。
那么剩下的一定是3,对于每个不确定的数字,如果它所含的因子只有它有,那么这两个因子可以合并,算第二问的时候个数$+=2$即可。
判断其它数字是否也有这个因子,只需要求gcd即可。
时间复杂度$O(\frac{nv^{\frac{1}{3}}}{\ln v})$。
#include<cstdio>
#include<cmath>
#include<algorithm>
#include<cstdlib>
using namespace std;
typedef long long ll;
const int N=1000000,B=10000,MAXL=220;
int n,i,j,k,tot,p[N],v[N],ca,cb,cc,ans0,ans1;ll a[64*600],b[610],c[610];
inline ll gcd(ll a,ll b){
ll c=1;
while(a-b){
if(a&1){
if(b&1){
if(a>b)a=(a-b)>>1;else b=(b-a)>>1;
}else b>>=1;
}else{
if(b&1)a>>=1;else c<<=1,a>>=1,b>>=1;
}
}
return c*a;
}
inline ll mul(ll a,ll b,ll n){return(a*b-(ll)(a/(long double)n*b+1e-3)*n+n)%n;}
inline ll pow(ll a,ll b,ll n){
ll d=1;a%=n;
while(b){
if(b&1)d=mul(d,a,n);
a=mul(a,a,n);
b>>=1;
}
return d;
}
inline bool check(ll a,ll n){
ll m=n-1,x,y;int i,j=0;
while(!(m&1))m>>=1,j++;
x=pow(a,m,n);
for(i=1;i<=j;x=y,i++){
y=pow(x,2,n);
if((y==1)&&(x!=1)&&(x!=n-1))return 1;
}
return y!=1;
}
inline bool miller_rabin(ll n){
int t=5;ll a;
if(!(n&1))return 0;
while(t--)if(check(rand()%(n-1)+1,n))return 0;
return 1;
}
inline ll getsqrt(ll n){
ll x=sqrt(n);
for(ll i=x-2;i<=x+2;i++)if(i*i==n)return i;
return 0;
}
inline void divide(){
ll n;
scanf("%lld",&n);
for(int i=0;i<tot&&p[i]<=n;i++)while(n%p[i]==0)n/=p[i],a[++ca]=p[i];
if(n==1)return;
if(miller_rabin(n)){a[++ca]=c[++cc]=n;return;}
ll t=getsqrt(n);
if(t){a[++ca]=t;a[++ca]=c[++cc]=t;return;}
b[++cb]=n;
}
inline void solve(ll n){
for(int i=1;i<=cc;i++)if(n%c[i]==0){
a[++ca]=c[i],a[++ca]=n/c[i];
return;
}
for(int i=1;i<=cb;i++){
ll t=gcd(n,b[i]);
if(t==1||t==n)continue;
a[++ca]=t,a[++ca]=n/t;
return;
}
a[++ca]=-n;
}
struct Num{
int a[MAXL],len,fu;
Num(){len=1,fu=a[1]=0;}
Num operator+(const Num&b){
Num c;
c.len=max(len,b.len)+2;
int i;
for(i=1;i<=c.len;i++)c.a[i]=0;
if(fu==b.fu){
for(i=1;i<=len;i++)c.a[i]=a[i];
for(i=1;i<=b.len;i++)c.a[i]+=b.a[i];
for(i=1;i<=c.len;i++)if(c.a[i]>=B)c.a[i+1]++,c.a[i]-=B;
while(c.len>1&&!c.a[c.len])c.len--;
c.fu=fu;
}else{
bool flag=0;
if(len==b.len){
for(i=len;i;i--)if(a[i]!=b.a[i]){
if(a[i]>b.a[i])flag=1;
break;
}
}else{
if(len>b.len)flag=1;
}
if(flag){
for(i=1;i<=len;i++)c.a[i]=a[i];
for(i=1;i<=b.len;i++)c.a[i]-=b.a[i];
for(i=1;i<=c.len;i++)if(c.a[i]<0)c.a[i+1]--,c.a[i]+=B;
while(c.len>1&&!c.a[c.len])c.len--;
c.fu=fu;
}else{
for(i=1;i<=b.len;i++)c.a[i]=b.a[i];
for(i=1;i<=len;i++)c.a[i]-=a[i];
for(i=1;i<=c.len;i++)if(c.a[i]<0)c.a[i+1]--,c.a[i]+=B;
while(c.len>1&&!c.a[c.len])c.len--;
c.fu=b.fu;
}
}
return c;
}
void write(){
printf("%d",a[len]);
for(int i=len-1;i;i--)printf("%04d",a[i]);
}
void set(int x){
if(x<0){a[len=1]=fu=1;return;}
fu=0,a[len=1]=x;
}
}num,sub;
int main(){
for(i=2;i<N;i++){
if(!v[i])p[tot++]=i;
for(j=0;j<tot&&i*p[j]<N;j++){
v[i*p[j]]=1;
if(i%p[j]==0)break;
}
}
scanf("%d",&n);
while(n--)divide();
for(i=1;i<=cb;i++)solve(b[i]);
sort(a+1,a+ca+1);
for(i=1;i<=ca;i=j){
for(j=i;j<=ca&&a[i]==a[j];j++);
k=j-i,tot=a[i]<0?2:1;
if(k>ans0)ans0=k,ans1=tot;else if(k==ans0)ans1+=tot;
}
printf("%d\n",ans0);
num.set(1);
while(ans1--)num=num+num;
sub.set(-1);
num=num+sub;
num.write();
return 0;
}