Cod sursa(job #283640)

Utilizator IonutCampeanIonut Campean IonutCampean Data 19 martie 2009 14:40:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<fstream.h>

main()
{
	long N, s=0, a, b, i, j, r;

	ifstream f("fractii.in");
	ofstream g("fractii.out");

	f>>N;

	for(i=1; i<=N; i++)
		for(j=1; j<=N; j++)
		{
			a=i; b=j;

			do
			{
				r=a%b;
				a=b;
				b=r;
            }	while(r);
			if(a==1)
				s++;
        }

	g<<s;

	f.close();
	g.close();

	return 0;
}