Cod sursa(job #1142440)

Utilizator AcuasPopescu Nicolae-Aurelian Acuas Data 13 martie 2014 20:45:21
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#include <fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
int n,v[1000000],i,j,k,ca,cb,c;
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++)
    {ca=v[i];
    cb=v[j];
    while (cb) {
        c = ca % cb;
        ca = cb;
        cb = c;
    }
    if(ca==1)
        k++;}
    }
    g<<k<<endl;
    return 0;
}