Cod sursa(job #173011)

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

f1=fopen("fractii.in","r");
f2=fopen("fractii.out","w");
fscanf(f1,"%lu",&n);
k=2*n-1;
for(i=2;i<=n;i++)
{ x=i;
 for(j=2;j<i;j++)
	{y=j;
	 while(x!=y)
			{if(x>y)
				x=x-y;
			 else
				y=y-x;}
			 if(x==1)
					k+=2;
					x=i;}}
fprintf(f2,"%lu\n",k);
fclose(f1);
fclose(f2);
return 0;}