Cod sursa(job #1159969)

Utilizator tudormaximTudor Maxim tudormaxim Data 29 martie 2014 23:50:21
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
#include <fstream>

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

int cmmdc(int p,int q)
{
    int a,b,r;
    a=p;b=q;
    while(b)
    {
        r=a%b;
        a=b;
        b=r;
    }
    return a;

}
int fractii(int n)
{
    int p=1,q,nr=0;
    while(p<=n)
    {
        q=1;
        while(q<=n)
        {
            if(cmmdc(p,q)==1)
                nr++;
            q++;
        }
        p++;
    }
    return nr;
}

int main()
{
    int n;
    in>>n;
    out<<fractii(n);
    in.close();
    out.close();
    return 0;
}