Cod sursa(job #568756)

Utilizator andreea29Iorga Andreea andreea29 Data 31 martie 2011 17:40:23
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<fstream>
using namespace std;
int main()
{long nrf=0, n, r, a, b, i, j;

ifstream f("fractii.in");
ofstream h("fractii.out");
f>>n;
for (i=1; i<=n; i++)
	{j=1;
	do
	{a=i;
	b=j;
		do
	{r=a%b;
		a=b;
		b=r;}
	while (r!=0);
	if (a==1)
		nrf=nrf+1;
	j=j+1;
	}
	while (j<=n);
	}
	h<<nrf<<'\n';
	
	f.close();
	h.close();
	return 0;
	}