Cod sursa(job #370359)

Utilizator liviu.chircuLiviu Chircu liviu.chircu Data 30 noiembrie 2009 21:13:49
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.68 kb
#include <stdio.h>

int main()
{ FILE *f, *rez;
  int i,j,n,a,b,r,c=0;
  f=fopen("fractii.in", "rt");
  fscanf(f, "%i", &n);
  fclose(f);
  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) c++;
                               }
  rez=fopen("fractii.out", "wt");
  fprintf(rez, "%i", n*n - c); 
  fclose(rez);
  return 0;
}