Cod sursa(job #240130)

Utilizator drag0s93Mandu Dragos drag0s93 Data 6 ianuarie 2009 21:39:48
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include<stdio.h>
int n,p,q,cp,cq;
int cmmdc()
{
	cq=q;
	cp=p;
	int r=0;
	if(cp<cq)
	{
		r=cp;
		cp=cq;
		cq=r;
	}
	while(cp%cq)
	{
		r=cp%cq;
		cp=cq;
		cq=r;
	}
	return cq;
}
int main()
{
	int nrfractii=0;
	freopen("fractii.in","r",stdin);
	freopen("fractii.out","w",stdout);
	scanf("%d",&n);
	for(p=1;p<=n;++p)
		for(q=1;q<=n;++q)
		{
			cmmdc();
			if(cq==1)
				++nrfractii;
		}
	printf("%d",nrfractii);
	return 0;
}