Cod sursa(job #117928)

Utilizator tamasgyGyorfi Tamas tamasgy Data 22 decembrie 2007 19:29:10
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <stdio.h>

long int cmmdc(int i,int j)
{
    if (j==0)
    {
        if (i==1)
           return 2;
        else return 0;
    }
    return cmmdc(j,i%j);


}

main()
{
long int n,i,j,m=1;
FILE* w,*r;

r=fopen("fractii.in","r");
fscanf(r,"%ld",&n);
for (i=1;i<=n;i++)
{
    for (j=1;j<=i-1;j++)
    {
        m += cmmdc(i,j);
    }
}
fclose(r);
w=fopen("fractii.out","w");
fprintf(w,"%ld",m);
fclose(w);
}