Cod sursa(job #1392586)

Utilizator JC161Crisan Ioana JC161 Data 18 martie 2015 19:03:23
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<iostream>
#include<fstream>
using namespace std;
main()
{
long int n,i,j,r,p,q,n1=0;

ifstream fin("fractii.in");
ofstream fout("fractii.out");

fin>>n;

for(i=1;i<=n;i++)
{p=i;
	for(j=1;j<=n; j++)
	{q=j;
	p=i;
	r=p%q;
	
	while(r){
	p=q;
	q=r;
	r=p%q;}

	if(q==1)
		n1++;
	}
}


fout<<n1;

fin.close();
fout.close();

}