Cod sursa(job #385178)

Utilizator Ionut_infoNicoara Ionut Ionut_info Data 22 ianuarie 2010 10:49:00
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include<stdio.h>
FILE *in=fopen("fractii.in","r");
FILE *out=fopen("fractii.out","w");
long int n,i,j,a,b,r,nr,ok,k;
int main()
{
fscanf(in,"%ld",&n);
if(n==1) fprintf(out,"1");
else
{
for(i=1;i<=n;i++)
{
 for(j=1;j<=n;j++)
 {
 ok=1;
 for(k=2;k<=i&&k<=j&&ok==1;k++)
  {
  if(i%k==0&&j%k==0)
   {
   ok=0;
   }
  }
 if(ok==1) nr++;
 }
}
fprintf(out,"%ld",nr);
}
return 0;
}