Cod sursa(job #229568)

Utilizator SoulEaterIncze Raul SoulEater Data 10 decembrie 2008 19:05:44
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<fstream.h> 
int main() 

{ int n, k=0, p, q, x, y, r;
  ifstream in ("fractii.in");
  in>>n;
  for (p=1; p<=n; p++)
       { for (q=1; q<=n; q++)
	       {
		 x=q;
		 y=p;
		 r=x%y;
		 while (r!=0)
		     { x=y;
		       y=r;
		       r=x%y;
		      }
		 if (y==1) k++;
		}
       }
  ofstream out ("fractii.out");
  out<<k;
  out.close();
  return 0; 
}