Cod sursa(job #265444)

Utilizator AlinaZZagan Alina-Elena AlinaZ Data 23 februarie 2009 21:49:27
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <fstream>

using namespace std;

long N;

int cmmdc(long x,long y)
{
    while (y)
    {
        int r=x%y;
        x=y;
        y=r;
    }
    return x;
}

int main()
{
    long nr=0;
    ifstream fin("fractii.in");
    ofstream fout("fractii.out");
    fin>>N;
    for (long P=1; P<=N; P++)
         for (long Q=1; Q<=N; Q++)
              if (cmmdc(P,Q)==1)
                  nr++;
    fout<<nr;
    return 0;
}