Cod sursa(job #926290)

Utilizator tamo1944Kovacs Tamas tamo1944 Data 25 martie 2013 09:22:59
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include<stdio.h>
 
long N;
 
int lnko(long a,long b)
{
    long s;
    while ( a != 0 ) 
    {
        s = a;
        a = b%a;
        b = s;
    }
     
    return b;
}
 
 
int main()
{
    long sz;
     
    FILE*f=fopen("fractii.in","rt");
    fscanf(f,"%ld",&N);
     
    for(long i=1;i<=N;i++)
    {
        for(long j=1;j<=N;j++)
        {
            if(lnko(i,j)==1 && i>=1)
                sz++;
             
        }
    }
     
    FILE*g=fopen("fractii.out","wt");
    fprintf(g,"%ld",sz);
     
    return 0;
}