Cod sursa(job #97268)

Utilizator SofinetiSofineti Mihai Sofineti Data 5 noiembrie 2007 21:48:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<stdio.h>
long r;
/*int cmmdc(int a,int b){

		 while(a!=b){
			if(a>b)a=a-b;
			else b=b-a;
			}
		 return a;
		 } */

long cmmdc(long x,long y){ do{r=x%y;
			     x=y;
			     y=r;
			     }while(r);
			   return x;}

int main()
{long n,i,j,k=0;
freopen("fractii.in","r",stdin);
freopen("fractii.out","w",stdout);

scanf("%ld",&n);

for(i=1;i<=n;i++)
 for(j=1;j<=n;j++)
       if(cmmdc(i,j)==1)k++;

printf("%ld",k);

return 0;
}