Cod sursa(job #112266)

Utilizator Spidermindmunteanu sergiu Spidermind Data 4 decembrie 2007 10:49:13
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");

int main()
{long n,i,j,k,rez=0;
int sw;
fin>>n;
for (i=1; i<=n; i++)
for (j=1; j<=n; j++)
if (i!=j) {sw=1; for (k=2; k<=j; k++)
		 if (i%k==0 && j%k==0) {sw=0; break;}
		 if (sw) rez++; }
fout<<rez+1;
fin.close();
fout.close();
return 0;
}