Cod sursa(job #231782)

Utilizator VladThVintilescu Vlad VladTh Data 14 decembrie 2008 14:06:15
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include<fstream.h>
long N,i,j,k,a,b,r;
int main()
{
 ifstream f("fractii.in");
 f>>N;
 f.close();
 for(i=1;i<=N;i++)
	for(j=1;j<=N;j++)
		{
		 a=i;
		 b=j;
		 while(b)
			{
			 r=a%b;
			 a=b;
			 b=r;
			}
		 if(a==1)
			k++;
		}
 ofstream fout("fractii.out");
 fout<<k;
 return 0;
}