Cod sursa(job #3201545)

Utilizator AnlegliftIvanus Victor Gabriel Anleglift Data 8 februarie 2024 23:23:50
Problema Fractii Scor 0
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.57 kb
#include <fstream>
#include <iostream>
using namespace std;
ifstream fin ("fractii.in");
ofstream fout("fractii.out");
int i,j,n,nr;
int cmmdc(int a,int b)
{
    int p1;
    if(a>b)
        p1=a;
    else
        p1=b;
    int ok=0;
    for(int i=p1; i>=2; i--)
        if(a%i==0 && b%i==0)
        {
            ok=1;
            break;
        }
    return ok;
}
int main()
{
    fin>>n;
    for(int i=1; i<=n; i++)
    {
        for(int j=1; j<=n; j++)
        {
            if(cmmdc(i,j)==0)
                nr++;
        }
    }
    fout<<nr;
}