Cod sursa(job #10852)

Utilizator DranaXumAlexandru Dumitru Paunoiu DranaXum Data 29 ianuarie 2007 19:43:22
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.7 kb
#include <stdio.h>


int cmmdc(long int a,long int b)
{
long int r;
int x=1;
if((a==1) || (b==1)) return 1;
while(x)
{
r=a%b;
a=b;
b=r;

if(r<2) x=0;
}
return r;
}

int main()
{
long x,n,i,j;
FILE *fin;
FILE *fout;
fin=fopen("fractii.in","r");
fout=fopen("fractii.out","w");
fscanf(fin,"%d",&n);
fclose(fin);
x=0;

long long f,f1,g=0;

for(i=1;i<=n/2;i++)
for(j=1;j<=n/2;j++)
{    
      if(cmmdc(i,j)) {
         f=n/j-1; if(f<0) f=0;
         f1=n/i-1; if(f1<0) f1=0;
         
      f=f>f1 ? f1 : f;
      x+=f;}
}
/*float fl,y=0;
fl=(float)x/n;*/
/*for(i=1;i<=n;i++)
   y=y+(n-fl);*/
   long long y;
   y=n*n-x;
fprintf(fout,"%d",(int)y);
fclose(fout);
return 0;
}