Cod sursa(job #1142467)

Utilizator AcuasPopescu Nicolae-Aurelian Acuas Data 13 martie 2014 21:01:09
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include <fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
int long long n,v[1000000],i,j,k,ca,cb,r;
int cmmdc(int a, int b)
{
    ca=a;
    cb=b;
    if(cb == 0)
        return ca;
    else return cmmdc(cb, ca % cb);
}
int main()
{
    f>>n;
    for(i=1;i<=n;i++)
        v[i]=i;
    for(i=1;i<=n;i++)
    {for(j=1;j<=n;j++)
    {r=cmmdc(v[i],v[j]);
    if(r==1)
        k++;}
    }
    g<<k<<endl;
    return 0;
}