Cod sursa(job #763334)

Utilizator EpicsteinGeorgescu Alexandru Lucian Epicstein Data 1 iulie 2012 20:24:49
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <cstdio>
unsigned cmmdc(unsigned long a, unsigned long b)
{
  
         if(a==1)
         return 1;
         if((a%b==0||b%a==0)&&b!=1)
         return 0;
         else
         return 1;

         
         
}
int main()
{
    FILE *f = fopen("fractii.in","r");
    FILE *g = fopen("fractii.out","w");
    unsigned long n,p,q;
    unsigned s=0;
    fscanf(f,"%d",&n);
    for(p=1;p<=n;p++)
    for(q=1;q<=n;q++)
    if(cmmdc(p,q)==1)
    s++;
    fprintf(g,"%d",s);
    fclose(f);
    fclose(g);
    return 0;
}