Cod sursa(job #286417)

Utilizator udrescu_cristiUdrescu Cristian udrescu_cristi Data 23 martie 2009 19:55:21
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<iostream.h>
#include<stdio.h>
FILE *f=fopen("fractii.in","r"),*g=fopen("fractii.out","w");
 int main()
{
 long long n,i,j,nr=0,a,b;
fscanf(f,"%ld",&n);
 for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
{
a=i;
b=j;
 while(a!=b)
{
if(a>b) a=a-b;
else b=b-a;
}
if(a==1) nr++;
}
fprintf(g,"%ld",nr);
 return 0;
}