Cod sursa(job #28283)

Utilizator edu2004euLuca Eduard edu2004eu Data 7 martie 2007 17:57:01
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int ggt(int f, int s) {
int r;
while(s!=0) {
 r=f%s;
 f=s;
 s=r;
}
return f;
}

int main(void) {
 int n,p=0,q,i,j;
 FILE *in=fopen("fractii.in","rt"),*out=fopen("fractii.out","w+");
 fscanf(in,"%d",&n);
 for (i=1;i<=n;i++)
  for (j=1;j<=n;j++) {
   if (ggt(i,j)==1) p=p+1;
  }
 fprintf(out,"%d",p);
}