Cod sursa(job #60673)

Utilizator me_andyAvramescu Andrei me_andy Data 15 mai 2007 22:47:51
Problema Medie Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<fstream.h>

 ifstream f("medie.in");
 ofstream g("medie.out");
  float a[9010],n,i,j,aux,k,l;
  int c;
int main()
{
 f>>n;
 for(i=1;i<=n;i++)
  f>>a[i];
 for(i=1;i<=n;i++)
  for(j=1;j<=n;j++)
	for(l=1;l<=n;l++)
	if(l!=i && i!=j && j!=l)
	 if(a[l]==(a[j]+a[i])/2)
	  c++;
	  
 g<<c/2;
 f.close();
 g.close();
 return 0;
}