Cod sursa(job #228180)

Utilizator Claudiu27121992Claudiu Oprea Claudiu27121992 Data 6 decembrie 2008 17:27:29
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include<fstream.h>
#define Fin "fractii.in"
#define Fout "fractii.out"
 int main()
{ long n,kn=0,a,b,x,y,r;
  ifstream in (Fin);
  in>>n;
  for (a=1; a<=n; a++)
   { for (b=1; b<=n; b++)
     { if (a%b==1 || b%a==1 && a==1 || b==1) break;
       x=a;
       y=b;
       r=x%y;
       while (r!=0)
	{ x=y;
	  y=r;
	  r=x%y;
	}
       if (y==1) kn++;
     }
   }
  ofstream out (Fout);
  out<<kn;
  out.close();



 return 0;
}