Cod sursa(job #25631)

Utilizator C_OvidiuCotletz Ovidiu C_Ovidiu Data 4 martie 2007 13:13:06
Problema Puteri Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
#include<fstream.h>
#include<math.h>
#define nm 10005
int long prim[100],d,a[nm],b[nm],c[nm],i,j,n,nr;

void primi()
{float rad;
 int i,d,p;
 for(i=2;i<=10;i++)
	{for(d=2,p=1,rad=sqrt(i);d<=rad;d++)
	  if(!(i%d))
		p=0;
	 if(p)
	   prim[++prim[0]]=i;
	  }
 }

int main()
{primi();
ifstream f("puteri.in");
 f>>n;
 for(i=1;i<=n;i++)
  {f>>a[i]>>b[i]>>c[i];
   for(j=1;j<i;j++)
	for(d=1;d<=prim[0];d++)
	  if((!((a[i]+a[j])%prim[d]))&&(!((b[i]+b[j])%prim[d]))&&(!((c[i]+c[j])%prim[d])))
		  {nr++;break;}
	}
 ofstream g("puteri.out");
 g<<nr;
 g.close();
 return 0;
 }