Cod sursa(job #1142606)

Utilizator mihail2Dan UVT mihail2 Data 13 martie 2014 23:12:26
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.68 kb
#include <fstream>
using namespace std;
int main()
{
    ifstream f("fractii.in");
    ofstream g("fractii.out");
    unsigned long n,p,q,nr;
    f>>n;
    nr=2*n-1;
    for(p=2;p<=n;p++)
        for(q=2;q<=n;q++)
        // luam fiecare p si vedem daca se imparte la q;
        {
            unsigned long p1=p,q1=q;
            if(p1>q1)
            {
                unsigned long aux=p1;
                p1=q1;
                q1=aux;
            }
            while (q1!=0)
            {
                unsigned long r;
                r=p1%q1;
                p1=q1;
                q1=r;
            }
            if (p1==1) nr++;
        }

    g<<nr;
}