Cod sursa(job #410090)

Utilizator mebobBota Bogdan mebob Data 4 martie 2010 09:02:10
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<fstream.h>
long n,nr=0;
long cmmdc(long x, long y)
{
	if(!x%y||!y%x||!(x%3||y%3)) return 0;
	long r=x%y;
	while(r) {x=y;y=r;r=x%y;}
	return y;
}
int main()
{
	ifstream in("fractii.in");
	in>>n;
	nr+=n;
	long i,j;
	for(i=2;i<=n;i+=2)
		for(j=1;j<=n;j+=2)
			if(cmmdc(i,j)==1) nr++;//cout<<i<<" "<<j<<endl}
	for(i=3;i<=n;i+=2)
		for(j=1;j<=n;j++)
			if(cmmdc(i,j)==1) nr++;
	ofstream out("fractii.out");
	out<<nr;
	out.close();
	return 0;
}