Cod sursa(job #557624)

Utilizator RoCoderRo COder RoCoder Data 16 martie 2011 18:55:54
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.77 kb
#include <stdio.h>

int main ()
{
    long s=0, r, a, b;

    long i, j, n;

    FILE *fi, *fo;
    fi=fopen("fractii.in","r");
    fo=fopen("fractii.out","w");

    fscanf(fi, "%ld", &n);

    s+=n;

    for (i=2; i<=n; i++)
    {
        s++;
        for(j=2; j<=n; j++)
        {
            //x=i%j;
            //fa cel mai mic divizor comun ca pt i=4 si j =6 nu ii corect
            //if(i>j && (i%j!=0)) s++;
            //else if(i<j && (j%i!=0)) s++;
            a=j;
            b=i;
            r = a % b;
            while(r != 0)
            {
                a = b;
                b = r;
                r = a % b;
            }

            if(b==1) s++;
        }
    }

    fprintf(fo,"%ld", s);
    fclose(fo);
    return 0;
}