Cod sursa(job #154204)

Utilizator iamdoruTanase Theodor iamdoru Data 10 martie 2008 23:31:22
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include <stdio.h>
FILE *f,*g;
long int cp,cq,p,q,n,contor=0;
int main() {
f=fopen("fractii.in" , "r");
g=fopen("fractii.out" , "w");
fscanf(f, "%d" , &n);
fclose(f);
for(p=1;p<=n;p++) 
		for(q=1;q<=n;q++){ cp=p; cq=q;
			while(cp!=cq)
				if(cp>cq) cp=cp-cq;
				else cq=cq-cp;
			if(cp==1) contor+=1; }
fprintf(g, "%d", contor);
fclose(g);
return(0);
}