Cod sursa(job #911153)

Utilizator NicuCJNicu B. NicuCJ Data 11 martie 2013 12:59:54
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <fstream>
#include <vector>
using namespace std;
int hsh[7001];
int sum, n, i, x[9001], j;
int main()
{
	ifstream f("medie.in");
	ofstream g("medie.out");
	f>>n;
	for(i=1; i<=n; i++)
	{
		f>>x[i];
	}
	for(i=1; i<=n; i++)
	{
		for(j=i+1; j<=n; j++)
		{
			if((x[i]+x[j])%2==0)
			{
				hsh[(x[i]+x[j])/2]++;
				if(x[i]==(x[i]+x[j])/2)
					sum--;
				if(x[j]==(x[i]+x[j])/2)
					sum--;
			}
		}
	}
	for(i=1; i<=n; i++)
	{
		sum+=hsh[x[i]];
	}
	g<<sum<<"\n";
}