Cod sursa(job #19470)

Utilizator FlorianFlorian Marcu Florian Data 19 februarie 2007 17:34:45
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
#include<sdio.h>
int main()
{int n,i,a,b,j,k=0,r;
FILE *f=fopen("fractii.in","r");
FILE *g=fopen("fractii.out","w");
fscanf(f,"%d",&n;
for (i=1; i<=n; i++)
		{k++;
		for (j=2; j<=n; j++)
			if (i!=j){a=i; b=j; r=a%b; while (r!=0){a=b; b=r; r=a%b;}
								if (b==1) k++;}
		}
fprintf(g,"%d",k);
 f.close();
 g.close();
 return 0;  }