Cod sursa(job #1195326)

Utilizator JustyFlyAlex weqr JustyFly Data 6 iunie 2014 21:19:52
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<iostream>
#include<fstream>
using namespace std;
long cmmdc(long m,long n)
{
    while (m!=n)
        if (m>n)
            m=m-n;
        else
            n=n-m;
    return n;
}
int main()
{
    long n,p,q,i=0;
    ifstream f("fractii.in");
    ofstream g("fractii.out");
    f>>n;
    f.close();
    for (q=1;q<=n;q++)
        for (p=1;p<=n;p++)
            if(cmmdc(p,q)==1)
                i++;
    g<<i;
    g.close();
    return 0;
}