Cod sursa(job #382417)

Utilizator CracanaSilviuCracana Silviu CracanaSilviu Data 13 ianuarie 2010 17:46:55
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include<fstream.h>
ifstream fin("fractie.in");
ofstream fout("fractie.out");
long N,i,j,ci,cj,r,ok;
int main()
{
	fin>>N;
	ok=0;
	for(i=1;i<=N;i++)
		for(j=1;j<=N;j++)
		{
			ci=i;
			cj=j;
			do
			{
				r=ci%cj;
				ci=cj;
				cj=r;
			}
			while(r);
			if(ci==1)
				ok++;
		}
		fout<<ok;
}