Cod sursa(job #112273)

Utilizator socrateMunteanu Sergiu socrate Data 4 decembrie 2007 11:33:48
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include<fstream.h>
#include<math.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");

int main()
{long n,i,j,k,rez=0;
int sw;
fin>>n;

for (i=2; i<=n; i++)
for (j=2; j<=n; j++)
if (i!=j && i%j!=0 && j%i!=0) {sw=1; for (k=2; k<=sqrt(j); k++)
	if (i%k==0 && j%k==0) {sw=0; break;}
	if (sw) rez++; }
fout<<rez+2*n-1;
fin.close();
fout.close();
return 0;
}