Pagini recente » Joc pe grid | Profil eudanip | Istoria paginii runda/pregatireoji_clasa_xi-xii/clasament | Cod sursa (job #2020160) | Cod sursa (job #183840)
Cod sursa(job #183840)
#include <cstdio>
#include <string>
#define Nmax 9001
#define Xmax 7001
int V[Nmax], N,w[Xmax];
void citire()
{
scanf("%d",&N);
for(int i=0; i<N; i++)
scanf("%d",V+i);
}
void solve()
{
long nr = 0;
int m;
for(int i=0; i<N; i++)
w[V[i]]++;
for(int i=0; i<N-1; i++)
for(int j=i+1; j<N; j++)
if(V[i] == V[j])
nr += w[V[i]] - 2;
else if(!((V[i] + V[j]) & 1 ) && w[m = (V[i] + V[j]) >> 1])
nr += w[m];
printf("%ld\n",nr);
}
int main()
{
freopen("medie.in","r",stdin);
freopen("medie.out","w",stdout);
citire();
solve();
}