Cod sursa(job #324759)

Utilizator udrescu_cristiUdrescu Cristian udrescu_cristi Data 17 iunie 2009 12:02:13
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<iostream.h>
#include<stdio.h>
FILE *f=fopen("fractii.in","r"),*g=fopen("fractii.out","w");
 long a,b; 
  int div(long a, long b)
{
 if(b==0) return a;
else return div(b,a%b);
}  
 int main()
{
 long n,i,j,nr=1;
fscanf(f,"%ld",&n);
 for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
{
if(i!=j)
{
a=i;
b=j;
 if(div(a,b)==1) nr++;
}
 }
fprintf(g,"%ld",nr);
 return 0;
}