Cod sursa(job #1604433)

Utilizator farmerjackandrei hodisan farmerjack Data 18 februarie 2016 11:59:32
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include <fstream>
using namespace std;

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

int main()
{
	int p,q,n,q1,p1,nr;
	fin>>n;
	p=1;
	q=1;
	nr=0;
	for(p=1;p<=n;p++)
	{
		for(q=1;q<=n;q++)
		{
			q1=q;
			p1=p;
			while(p1!=q1)
			{
				if(q1>p1)
					q1=q1-p1;
				else
					p1=p1-q1;
			}
			if(q1==1)
				nr=nr+1;
		}
		
	}
	fout<<nr;
	return 0;
}