Cod sursa(job #300458)

Utilizator jupanubv92Popescu Marius jupanubv92 Data 7 aprilie 2009 14:14:08
Problema Medie Scor 60
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
#include<stdio.h>
#include<string.h>
#define Nmx 9004
#define Mmx 7004

int a[Nmx];
int uz[Mmx],ver[Mmx],n;

void solve()
{
	for(int i=1;i<=n;i++)
	{
		for(int j=i+1;j<=n;j++)
		{
			if((a[i]+a[j])%2==0)
				ver[(a[i]+a[j])/2]++;
		}
	}
}

void afis()
{	
	long long nr=0;
	for(int i=1;i<=n;i++)
		if(ver[a[i]])
			nr+=(ver[a[i]]-uz[a[i]]+1);
	printf("%lld\n",nr);
}

int main()
{
	freopen("medie.in","r",stdin);
	freopen("medie.out","w",stdout);
	scanf("%d",&n);
	for(int i=1;i<=n;i++)
		{scanf("%d",&a[i]);
	     uz[a[i]]++;
		}
	solve();
	afis();
	return 0;
}