Cod sursa(job #318807)

Utilizator Anamaria20Cotirlea Anamaria Anamaria20 Data 29 mai 2009 14:39:22
Problema Medie Scor 50
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <stdio.h>

using namespace std;

FILE *f,*s;

int m,n,i,j,v1[10000],v2[10000];
long long int rez;

int main()
{
	f=fopen("medie.in","r");
	s=fopen("medie.out","w");
	
	fscanf(f,"%d\n",&n);
	
	for(i=1;i<=n;i++)
		fscanf(f,"%d\n",&v1[i]);
	
	for(i=1;i<n;i++)
	{
		for(j=i+1;j<=n;j++)
		{
			m=v1[i]+v1[j];
			
			if(m==v1[i]*2)
				rez--;
		
			v2[m]++;
		}	
	}	
	
	for(i=1;i<=n;i++)
		rez+=v2[v1[i]*2]--;

	fprintf(s,"%lld",rez);
	
	fclose(s);
	
	return 0;
}