Cod sursa(job #138394)

Utilizator nighthawkghenea alexandru madalin nighthawk Data 18 februarie 2008 16:10:19
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include<fstream.h>
int main()
{ifstream f("fractii.in");
 ofstream g("fractii.out");
 long a,i,s,j,k,sw;
 f>>a;
 s=2*a-1;
 for(i=2;i<=a;i++)
	{for(j=2;j<=a;j++)
		if(i%j!=0)
			{sw=1;
			for(k=2;k<=j;k++)
				if(j%k==0&&i%k==0)
					{sw=0;
					}
			if(sw)s++;
			}
	}
 g<<s;
 g.close();
return 0;}