Cod sursa(job #1110488)

Utilizator liviufLiviu Florescu liviuf Data 18 februarie 2014 09:33:38
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.56 kb
#include <fstream>

using namespace std;

int main()
{
    ifstream in("fractii.in");
    ofstream out("fractii.out");
    int n,p,q,d,f=0,a,b,r;
    in>>n;
    for(p=1;p<=n;p++)
    {
        for(q=1;q<=n;q++)
        {
            /*if(p%2==0&&q%2==0)break;
            if(p%3==0&&q%3==0)break;
            if(p%5==0&&q%5==0)break;
            if(p%7==0&&q%7==0)break;*/
            a=p;
            b=q;
            while(r=a%b)
            {
                a=b;b=r;
            }
            if(b==1)f++;
        }
    }
    out<<f;
}