Cod sursa(job #28548)

Utilizator oznmonkeyZene Andrei Cristian oznmonkey Data 7 martie 2007 23:33:26
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include<fstream.h>
#include<math.h>
int main()
{	int n,i,j,nr=0,a,b;
	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(a!=b)
						if(a>b) a-=b;
						else	b-=a;
					 if(a==1) nr++;}
	g<<nr*2+1;
	f.close();
	g.close();
	return 0;
}