Cod sursa(job #159994)

Utilizator redkar23Dezactiveazama redkar23 Data 14 martie 2008 17:13:19
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.33 kb
Raporteaza aceasta sursa 
#include <stdio.h>

FILE *f,*g;
int n,i,j,how;

int cmmdc(int a,int b){
int r;
for(;;){
r=a%b;
a=b;
if(!r) return b;
b=r;
}
return b;
}


int main(){
f=fopen("fractii.in","r");
g=fopen("fractii.out","w");
fscanf(f,"%d",&n);
for(i=1;i<=n;i++)
  for(j=1;j<=n;j++)
      if(cmmdc(i,j)==1) how++;
fprintf(g,"%d\n",how);
fclose(g);
return  0;
}