Cod sursa(job #29372)

Utilizator JacKtHeRIpErLobont Andrei JacKtHeRIpEr Data 9 martie 2007 10:12:03
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.37 kb
#include"fstream.h"

int main()
{
   ifstream f("fractii.in");
   ofstream o("fractii.out");
   int n, p, q, i, j, k=0;
   f>>n;
   for(i=1; i<=n; i++)
      for(j=1; j<=n; j++)
      {
	 p=i; q=j;
	 do{
	    if(p>q)
	       p-=q;
	    if(q>p)
	       q-=p;
	 }while(p!=q);
	 if(p==1)
	    k++;
      }
   o<<k;
   f.close();
   o.close();
   return 0;
}