Cod sursa(job #699206)

Utilizator sanzi.voicuVoicu Sanziana-Aurelia sanzi.voicu Data 29 februarie 2012 18:10:38
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<cstdio>
int main ()
{
	long n,i,j,r,a,b,nr=0;
	FILE *f=fopen("fractii.in","r");
	FILE *g=fopen("fractii.out","w");
	fscanf(f,"%d",&n);
	for (i=1;i<=n;i++)
		for (j=1;j<=n;j++) {
			a=i;
			b=j;
			while (a%b!=0) {
				r=a%b;
				a=b;
				b=r;
			}
			if (b==1) nr++;
		}
	fprintf(g,"%d",nr);
	fclose(f);
	fclose(g);
	return 0;
}