Cod sursa(job #1343470)

Utilizator NicuBaciuNicu Baciu NicuBaciu Data 15 februarie 2015 15:13:11
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include <fstream>

using namespace std;

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

int main()
{
    int n, p, q, r, ct=0, p1, q1;

    fin >> n;

    for(p=1; p<=n; p++)
    {
        for(q=1; q<=n; q++)
        {
            r=p%q;
            p1=p;
            q1=q;
            while(r!=0)
            {
                p1=q1;
                q1=r;
                r=p1%q1;
            }
            if(q1==1)
            {
                ct++;
            }
        }
    }

    fout<<ct;
    return 0;
}