Cod sursa(job #385153)

Utilizator Ionut_infoNicoara Ionut Ionut_info Data 22 ianuarie 2010 10:18:25
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.25 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int main()
{
fscanf(in,"%d",&n);
if(n==1) fprintf(out,"1");
else
{
for(i=1;i<=n;i++)
{
 for(j=1;j<=n;j++)
 {
 a=i;b=j;
 while(b!=0)
  {
  r=a%b;
  a=b;
  b=r;
  }
 if(a!=1) nr++;
 }
}
fprintf(out,"%d",nr);
}
}