Cod sursa(job #2133703)

Utilizator banutraul1234567Banut Raul Emanuel banutraul1234567 Data 17 februarie 2018 10:59:08
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <stdio.h>
#include <stdlib.h>
FILE *f,*g;
int cmmdc(int a , int b)
{
    int r;
    while(b!=0)
    {
        r=a%b;
        a=b;
        b=r;
    }
    return a;
}
int main()
{
    int i,j,n,nr=0;
    f=fopen("fractii.in","r");
    g=fopen("fractii.out","w");
    fscanf(f,"%d",&n);
    for(i=1;i<=n;i++)
         for(j=i;j<=n;j++)
         {
                 if(cmmdc(i,j)==1)
                    nr+=2;
         }
    fprintf(g,"%d",nr-1);
    return 0;
}