Cod sursa(job #183323)

Utilizator valentinroscaRosca Valentin valentinrosca Data 21 aprilie 2008 22:32:44
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
#include<fstream.h>
#include<math.h>
int N,a,b,ca,cb,s,r;
int main()
{
	ifstream input("fracti.in");
	ofstream output("fracti.out");
	input>>N;
	for(a=1;a<=N;a++)
		for(b=1;b<=N;b++);
		{
		ca=a;
		cb=b;
		do
		{
			r=ca%cb;
			ca=cb;
			cb=r;
		}
		while(r);
		if(ca==1)
			s++;
		}
	output<<s;
	return 0;
}