Cod sursa(job #2212425)

Utilizator viorel.mocanuMocanu Viorel Gabriel viorel.mocanu Data 14 iunie 2018 02:13:47
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <stdio.h>
#include <stdlib.h>

int NrPrime(int a, int b)
{
  int r = a%b;
  while(r!=0)
  {
    a = b;
    b = r;
    r = a%b;
  }
  if(b>1)
    return 0;
  else
    return 1;
}

int main(int argc, char const *argv[]) {
  FILE *f;
  f = fopen("fractii.in","r");
  int a;
  fscanf(f,"%d",&a);
  int i,j;

  int nr_fractii = 0;
  for (i=1;i<=a;i++)
  {
    for(j=1;j<=a;j++)
    {
      if(NrPrime(i,j))
      {
        nr_fractii++;
      }
    }
  }

  fclose(f);

  f = fopen("fractii.out","w");
  fprintf(f,"%d\n",nr_fractii);
  return 0;
}