Cod sursa(job #193913)

Utilizator jakussanodavid vladescu jakussano Data 7 iunie 2008 17:18:47
Problema Medie Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream.h>
int n,i,a,b,x;
float nr[9000];
int main()
{
fstream fin("medie.in",ios::in);
fstream fout("medie.out",ios::out);

fin>>n;

for(i=0;i<n;i++)
	fin>>nr[i];
for(i=0;i<n;i++)
	{
	for(a=0;a<n-1;a++)
		for(b=a+1;b<n;b++)
			if(a!=i && b!=i)
				if(nr[i]==(nr[a]+nr[b])/2)
					x++;
	}
fout<<x<<endl;
fin.close();
fout.close();
return 0;

}