Cod sursa(job #583825)

Utilizator RalukaTuplea Raluca Raluka Data 22 aprilie 2011 19:28:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.28 kb
Raporteaza aceasta sursa 
#include<iostream.h>
#include<fstream.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");
int main ()
{int n,i,j,k=0,r,a,b;
fin>>n;
for(i=1; i<=n; i++)
	{for(j=1; j<=n; j++)
		{a=i; b=j; r=a%b;
	while(r!=0)
{a=b;
b=r;
r=a%b;
}
if(b==1)
	k++;}}
	fout<<k;
	}