Cod sursa(job #241621)

Utilizator adytzu2007Adrian Bacircea adytzu2007 Data 10 ianuarie 2009 15:32:56
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include <stdio.h>
#include <conio.h>
long n;
FILE *f=fopen("fractii.in","r");
FILE *g=fopen("fractii.out","w");
long euclid(long a, long b)
{
    if (a>b&&b!=0) euclid (b,a%b);
    else if (b==0) return a;
}

int main()
{
    long i,j,nr=0;
    fscanf(f,"%ld",&n);
    for (i=1;i<=n;i++)
    for (j=1;j<=n;j++)
    if (i>j&&euclid(i,j)==1) {nr++;printf("%ld",nr);getch();}
    else if (i<j&&euclid(j,i)==1) nr++;
    fprintf(g,"%ld",nr);
    fclose(f);
    fclose(g);
    return 0;
}