Cod sursa(job #171445)

Utilizator georgebGeorge Buzoianu georgeb Data 4 aprilie 2008 13:29:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include<stdio.h>
#include<math.h>
FILE *f1,*f2;
int main()
{long unsigned n,k=0,i,j,x,y,o,p;

f1=fopen("fractii.in","r");
f2=fopen("fractii.out","w");
fscanf(f1,"%lu",&n);
for(i=1;i<=n;i++)
{ x=i;
 for(j=1;j<=n;j++)

		{ y=j;
	 while(x!=y)
			{if(x>y)
				x=x-y;
			 else
				y=y-x;}
			 if(x==1)
					k++;
					x=i;}}

fprintf(f2,"%lu\n",k);









fclose(f1);
fclose(f2);
return 0;}