Cod sursa(job #1284179)

Utilizator iuliaarmArmegioiu Iulia iuliaarm Data 6 decembrie 2014 12:22:48
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <iostream>
#include <fstream>

using namespace std;
ifstream fin("fractii.in");
ofstream fout("fractii.out");

int main()
{
    unsigned n,p,q,copq,copp,k,r;
    fin>>n;
    k=n*2-1;
    for(p=2;p<=n;p++)
    {
        for(q=p+1;q<=n;q++)
        {
            copp=p;
            copq=q;
            while(copq)
            {
                r=copp%copq;
                copp=copq;
                copq=r;
            }
            if(copp==1)
                k+=2;
        }
    }
    fout<<k;
    return 0;
}