3509: [CodeChef] COUNTARI

Time Limit: 40 Sec  Memory Limit: 128 MB
Submit: 883  Solved: 250
[Submit][Status][Discuss]

Description

给定一个长度为N的数组A[],求有多少对i, j, k(1<=i<j<k<=N)满足A[k]-A[j]=A[j]-A[i]。

Input

第一行一个整数N(N<=10^5)。
接下来一行N个数A[i](A[i]<=30000)。

Output

一行一个整数。

Sample Input

10
3 5 3 6 3 4 10 4 5 2

Sample Output

9

HINT

Source

分析:

考虑枚举中间项$a[j]$,我们可以使用$FFT$快速计算$ik$的配对个数,但是这样显然是$O(Nmaxnumlgmaxnum)$的,还没有暴力跑的快...

所以可以考虑分块,对于$ijk$都在同一块内或者$ij$在一块或者$jk$在一块的情况我们预处理出来,这些的复杂度是$O(len*N)$的,然后$ik$位于和$j$不同快的情况我们用$FFT$来计算,这个的复杂度是$O(\frac {N}{len}*maxnumlgmaxnum)$的...

如此计算,块的大小大概开到3000~2000就可以过去了...

代码:

#include<algorithm>
#include<iostream>
#include<cstring>
#include<cstdio>
#include<cmath>
using namespace std; const int maxn=100000+5,maxblock=50+5;
const double pi=acos(-1); int n,N,m,L,blo,a[maxn],R[maxn],id[maxn],be[maxblock],en[maxblock],cnt[maxblock][maxn];
long long ans; struct complex{ double r,i; inline complex(double a=0,double b=0): r(a),i(b) {}; inline complex operator + (const complex &a){
return complex(r+a.r,i+a.i);
} inline complex operator - (const complex &a){
return complex(r-a.r,i-a.i);
} inline complex operator * (const complex &a){
return complex(r*a.r-i*a.i,r*a.i+i*a.r);
} }l[maxn],s[maxn]; inline void FFT(complex *l,int f){
for(int i=0;i<N;i++)
if(i>R[i]) swap(l[i],l[R[i]]);
for(int i=1;i<N;i<<=1){
complex wn(cos(pi/i),f*sin(pi/i));
for(int j=0;j<N;j+=i<<1){
complex w(1,0);
for(int k=0;k<i;k++,w=w*wn){
complex x=l[j+k],y=l[j+k+i]*w;
l[j+k]=x+y;
l[j+k+i]=x-y;
}
}
}
if(f==-1)
for(int i=0;i<N;i++)
l[i].r/=N;
} signed main(void){
// freopen("countari.in","r",stdin);
// freopen("countari.out","w",stdout);
scanf("%d",&n);
L=0;ans=0;
for(int i=1;i<=n;i++)
scanf("%d",&a[i]);
for(N=1;N<=60000;N<<=1) L++;
for(int i=0;i<N;i++)
R[i]=(R[i>>1]>>1)|((i&1)<<(L-1));
blo=min(int(sqrt(n)*10),n);
for(int i=1;i<=n;i++) id[i]=(i-1)/blo+1;
for(int i=1;i<=id[n];i++)
be[i]=lower_bound(id+1,id+n+1,i)-id,
en[i]=upper_bound(id+1,id+n+1,i)-id-1;
memset(cnt,0,sizeof(cnt));
for(int i=1;i<=n;i++) cnt[id[i]][a[i]]++;
for(int B=1;B<=id[n];B++){
for(int i=be[B];i<=en[B];i++){
cnt[B][a[i]]--;
for(int j=be[B];j<i;j++)
if(2*a[i]-a[j]>=0) ans+=cnt[B][2*a[i]-a[j]];
}
}
memset(cnt,0,sizeof(cnt));
for(int i=1;i<=n;i++) cnt[0][a[i]]++;
for(int B=1;B<=id[n];B++){
for(int i=be[B];i<=en[B];i++) cnt[0][a[i]]--;
for(int i=be[B];i<=en[B];i++){
for(int j=be[B];j<i;j++)
if(2*a[i]-a[j]>=0) ans+=cnt[0][2*a[i]-a[j]];
}
}
memset(cnt,0,sizeof(cnt));
for(int i=1;i<=n;i++) cnt[0][a[i]]++;
for(int B=id[n];B>=1;B--){
for(int i=be[B];i<=en[B];i++) cnt[0][a[i]]--;
for(int i=be[B];i<=en[B];i++){
for(int j=i-1;j>=be[B];j--)
if(2*a[j]-a[i]>=0) ans+=cnt[0][2*a[j]-a[i]];
}
}
for(int B=1;B<=id[n];B++){
for(int i=0;i<N;i++) l[i].r=l[i].i=s[i].r=s[i].i=0;
for(int i=1;i<be[B];i++) l[a[i]].r++;
for(int i=en[B]+1;i<=n;i++) s[a[i]].r++;
FFT(l,1);FFT(s,1);
for(int i=0;i<N;i++) l[i]=l[i]*s[i];
FFT(l,-1);
for(int i=be[B];i<=en[B];i++) ans+=int(l[a[i]*2].r+0.5);
}
printf("%lld\n",ans);
return 0;
}

  


By NeighThorn

BZOJ 3509: [CodeChef] COUNTARI的更多相关文章

  1. [BZOJ 3509] [CodeChef] COUNTARI (FFT+分块)

    [BZOJ 3509] [CodeChef] COUNTARI (FFT+分块) 题面 给出一个长度为n的数组,问有多少三元组\((i,j,k)\)满足\(i<j<k,a_j-a_i=a_ ...

  2. bzoj 3509: [CodeChef] COUNTARI] [分块 生成函数]

    3509: [CodeChef] COUNTARI 题意:统计满足\(i<j<k, 2*a[j] = a[i] + a[k]\)的个数 \(2*a[j]\)不太好处理,暴力fft不如直接暴 ...

  3. BZOJ 3509 [CodeChef] COUNTARI ——分块 FFT

    分块大法好. 块内暴力,块外FFT. 弃疗了,抄SX队长$silvernebula$的代码 #include <map> #include <cmath> #include & ...

  4. BZOJ3509: [CodeChef] COUNTARI

    3509: [CodeChef] COUNTARI Time Limit: 40 Sec  Memory Limit: 128 MBSubmit: 339  Solved: 85[Submit][St ...

  5. bzoj 4546: codechef XRQRS [可持久化Trie]

    4546: codechef XRQRS 可持久化Trie codechef上过了,bzoj上蜜汁re,看别人说要开5.2e5才行. #include <iostream> #includ ...

  6. BZOJ 3221: [Codechef FEB13] Obserbing the tree树上询问( 可持久化线段树 + 树链剖分 )

    树链剖分+可持久化线段树....这个一眼可以看出来, 因为可持久化所以写了标记永久化(否则就是区间修改的线段树的持久化..不会), 结果就写挂了, T得飞起...和管理员拿数据调后才发现= = 做法: ...

  7. BZOJ 3514: Codechef MARCH14 GERALD07加强版( LCT + 主席树 )

    从左到右加边, 假如+的边e形成环, 那么记下这个环上最早加入的边_e, 当且仅当询问区间的左端点> _e加入的时间, e对答案有贡献(脑补一下). 然后一开始是N个连通块, 假如有x条边有贡献 ...

  8. BZOJ 4260: Codechef REBXOR( trie )

    求出前缀和, 那么以第x个元素结尾的最大异或值是max(sumx^sump)(1≤p<x), 用trie加速. 后缀同理, 然后扫一遍就OK了.时间复杂度O(31N) ------------- ...

  9. BZOJ 3514: Codechef MARCH14 GERALD07加强版 [LCT 主席树 kruskal]

    3514: Codechef MARCH14 GERALD07加强版 Time Limit: 60 Sec  Memory Limit: 256 MBSubmit: 1312  Solved: 501 ...

随机推荐

  1. vue项目跨域问题

    跨域 了解同源政策:所谓"同源"指的是"三个相同". 协议相同 域名相同 端口相同 解决跨域 jsonp 缺点:只能get请求 ,需要修改B网站的代码 cors ...

  2. python2, 3环境变量配置(win10下)

    1.找到此电脑,右击点击属性 2.左边侧栏,高级系统设置 3.系统属性中点击高级 4.点击环境变量 5.可以看到 某某某用户变量和系统变量两个方框 其中,系统变量是要你在打开cmd是用管理员身份运行所 ...

  3. tcl之list操作-lappend/lsearch/lsort/concat/split/join/

  4. Yii 2.x html 代码压缩

    <?php namespace Pangu\web; use yii\base\Component; /** * html格式响应内容格式化 * @author zhouzhian * */ c ...

  5. 删除Zend Studio项目

    导入了过大的项目,导致很卡,且Close Project和Delete操作不了,一直无响应. 调整项目目录下的隐藏文件夹,删除对应项目: E:\www\.metadata\.plugins\org.e ...

  6. JZOJ 5842

    Description 给定一个n*m 的 01 矩阵,求包含[l,r]个 1 的子矩形个数. Input 第一行,两个正整数n,m.接下来n 行,每行一个长度为 m 的 01 串,表示给定的矩阵.接 ...

  7. Problem I. Count - HDU - 6434(欧拉函数)

    题意 给一个\(n\),计算 \[\sum_{i=1}^{n}\sum_{j=1}^{i-1}[gcd(i + j, i - j) = 1]\] 题解 令\(a = i - j\) 要求 \[\sum ...

  8. CDOJ:1636-梦后楼台高锁,酒醒帘幕低垂(Kruskal+暴力)

    梦后楼台高锁,酒醒帘幕低垂 Time Limit: 3000/1000MS (Java/Others) Memory Limit: 65535/65535KB (Java/Others) Submit ...

  9. DFS:HDU1518-Square(剪枝较多的DFS)

    题目: Square Time Limit: 10000/5000 MS (Java/Others)    Memory Limit: 65536/32768 K (Java/Others) Tota ...

  10. [BZOJ3684][拉格朗日反演+多项式求幂]大朋友和多叉树

    题面 Description 我们的大朋友很喜欢计算机科学,而且尤其喜欢多叉树.对于一棵带有正整数点权的有根多叉树,如果它满足这样的性质,我们的大朋友就会将其称作神犇的:点权为\(1\)的结点是叶子结 ...