Cod sursa(job #1395789)

Utilizator eusebiu-andreiEusebiu-Andrei Gagea eusebiu-andrei Data 21 martie 2015 14:52:15
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.52 kb
#include <fstream>
using namespace std;
ifstream fin("fractii.in");
ofstream fout("fractii.out");
int main()
{
    int n,r,a,b,nr,i,j;
    fin>>n;
    nr=n;
    for(i=2;i<=n;i++)
        for(j=1;j<=n;j++)
        {
            if(i!=j)
            {
            a=i;
            b=j;
            r=a%b;
            while(r>0)
            {
                a=b;
                b=r;
                r=a%b;
            }
            if(b==1) nr++;
            }
        }
    fout<<nr<<endl;
    return 0;
}