Cod sursa(job #335352)

Utilizator Cata99Putan Catalin Cata99 Data 29 iulie 2009 17:57:59
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
#include<fstream.h>
int divizor(long i,long j)
{
long t=0,r;
for (r=2;r<=i;r++)if (i%r==0&&j%r==0)t++;
return t;
}
int main()
{
long N,i,j,r=0;
ifstream f("fractii.in");
f>>N;
for (i=2;i<=N;i++)
for (j=2;j<=N;j++)
if (divizor(i,j)==0)r++;
r=r+N+N-1;
ofstream d("fractii.out");
d<<r;
f.close();
d.close();
return 0;
}