Cod sursa(job #1668255)

Utilizator Gigel-FroneGigel Fronel Gigel-Frone Data 29 martie 2016 18:05:16
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
#include <iostream>
#include <fstream>

using namespace std;

int RelativPrime(int a, int b)
{
    int r;

    r=a%b;
    while(r!=0)
    {
        a=b;
        b=r;
        r=a%b;
    }
    if(b==1) r=1;
    else r=0;

    return r;

}

int main()
{
    cout << "Hello world!" << endl;

    ifstream f("fractii.in");
    ofstream g("fractii.out");

    int k=0, n, a, b;

    f >> n;

    for(int i=1; i<=n; i++)
        for(int j=1; j<=n; j++)
        {
            a=i;
            b=j;

            if(RelativPrime(a,b)) k++;
        }

    g << k;
}