Cod sursa(job #160020)

Utilizator redkar23Dezactiveazama redkar23 Data 14 martie 2008 17:46:42
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.42 kb
#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 0;
}

int mod=1;

int main(){
f=fopen("fractii.in","r");
g=fopen("fractii.out","w");
fscanf(f,"%d",&n);
how=n;
for(i=2;i<=n;i++){
  if(!i%2) mod=2;
  else mod=1;
  for(j=1;j<=n;j+=mod)
     if(((j%i&&i%j)||i==1||j==1)&&cmmdc(i,j)==1)  how++;
}

fprintf(g,"%d\n",how);
fclose(g);
return  0;
}