Cod sursa(job #19799)

Utilizator oprea_florinoprea florin oprea_florin Data 19 februarie 2007 23:07:46
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int main()
{
int p,q,n,c,a,b;
FILE *in=fopen("fractii.in","r");
FILE *out=fopen("fractii.out","w");
fscanf(in,"%d",&n);


c=n+n/2+n%2;
for(q=3;q<=n;q++)
	for(p=1;p<=n;p++){
		a=p;
		b=q;
		while(a!=b){
			if(b>a) b=b-a;
			else a=a-b;
		}
		if(a==1) c++;
	}
fprintf(out,"%d\n",c);

fcloseall();
return 0;
}