Cod sursa(job #203188)

Utilizator chelaru_t_achelaru traian andrei chelaru_t_a Data 14 august 2008 14:15:44
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include <fstream.h>

long div(long i,long j)
{
   long r;
   do
   {
     r=i%j;
     i=j;
     j=r;
     }
   while (r!=0);
   return i;
   }

void main()
{
   long n,nf,i,j;
   ifstream f("fractii.in");
   ofstream g("fractii.out");
   f>>n;
   nf=2*n-1;
   for (i=2; i<=n; i++)
     for (j=2; j<=n; j++)
       if (div(i,j)==1) nf++;
   g<<nf;
   f.close();
   g.close();
   }