Cod sursa(job #28547)

Utilizator oznmonkeyZene Andrei Cristian oznmonkey Data 7 martie 2007 23:29:44
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include<fstream.h>
#include<math.h>
int main()
{	int n,i,j,nr=0,a,b,r,d;
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	f>>n;
	for(i=1;i<=n;i++)
		for(j=1;j<=i;j++)
		 if(i!=j)
		      if(i==j+1||j==i+1) nr++;
		      else
		      if((j==2||j==3||j==5||j==7||j==11)&&i%j!=0) nr++;
				else if(j!=2||j!=3||j!=5||j!=7||j!=11)
					{a=j;b=i;
					 while(b!=0)
						{r=a%b;a=b;b=r;}
					 if(a==1) nr++;}
	g<<nr*2+1;
	f.close();
	g.close();
	return 0;
}