Cod sursa(job #420457)

Utilizator RengelBotocan Bogdan Rengel Data 19 martie 2010 11:27:15
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include<stdio.h>
FILE *fin=fopen("fractii.in","r");
FILE *fout=fopen("fractii.out","w");
int cmmdc(int a,int b){
	int r=a%b;
	while(r!=0){
		a=b;
		b=r;
		r=a%b;
	}
	if(b==1) return 1;
	return 0;
}
int n,k,i,j;
int main(){
	fscanf(fin,"%d",&n);
	k=0;
	for(i=1;i<=n;i++)
		for(j=1;j<=n;j++)
			if(cmmdc(i,j)) k++;
	fprintf(fout,"%d",k);
	fclose(fin);
	fclose(fout);
	return 0;
}