Cod sursa(job #290317)

Utilizator Bogdan_tmmTirca Bogdan Bogdan_tmm Data 27 martie 2009 19:05:35
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.52 kb
#include<iostream>
#include<stdio.h>
#include<vector>
using namespace std;
int n,i,j,x;
int nr=0;
int main()
{
	freopen("medie.in","r",stdin);
	freopen("medie.out","w",stdout);
	scanf("%d",&n);
	vector<long> a,v(7010,0);
	a.push_back(0);
	for(i=1;i<=n;i++)
	{
		scanf("%d",&j);
		a.push_back(j);
		v[j]++;
	}
	for(i=1;i<n;++i)
		for(j=i+1;j<=n;++j)
			if((a[i]+a[j])%2==0)
			{
				x=a[i]+a[j];
				nr+=v.at(x>>1);
				if(a[i]==x/2) --nr;
				if(a[j]==x/2) --nr;
			}
	printf("%d\n",nr);
	return 0;
}