Cod sursa(job #1255154)

Utilizator XzenomiaTamas Talida Xzenomia Data 4 noiembrie 2014 13:54:16
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <iostream>
#include <fstream.h>

ifstream f("fractii.in");
ofstream g("fractii.out");

int prime(long a, long b)
{
         long r;
         r=a%b;
         while(r>0)
         {
                   a=b;
                   b=r;
                   r=a%b;
         }

         if (b==1)
         return 1;
         else
         return 0;
}

int main()
{long n,p,q,cont=1;

f>>n;

for (q=1; q<=n; q++)
        for(p=1; p<q; p++)
        if (prime(p,q)==1)
        cont=cont+2;

g<<cont;

f.close();
g.close();

}