Cod sursa(job #1284172)

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

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

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