Cod sursa(job #60508)

Utilizator me_andyAvramescu Andrei me_andy Data 14 mai 2007 21:55:25
Problema Medie Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include<fstream.h>

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