Cod sursa(job #1060072)

Utilizator razvan.atdRazvan Atodiresei razvan.atd Data 17 decembrie 2013 16:10:10
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <iostream>
#include <fstream>

using namespace std;

int cmmdc(int a,int b)
{
    int r;
    r=a%b;
    while(r!=0)
    {
        a=b;
        b=r;
        r=a%b;
    }
    return b;
}

int main()
{
    int n,S;
    float i,j;
    ifstream f("fractii.in");
    ofstream g("fractii.out");
    f>>n;
    S=0;
    for(i=1;i<=n;i++)
        for(j=1;j<=n;j++)
            if(cmmdc(i,j)==1)
                S++;
    g<<S;

    return 0;
}