Cod sursa(job #106115)

Utilizator teofilTeofil teofil Data 18 noiembrie 2007 12:54:21
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include <fstream.h>
int ired(int p,int q)
{
  int rest;
  while (q){
        rest = p % q;
        p = q;
        q = rest;
    }  
  if (p==1)
    return 1;
  else
    return 0;
}
void main()
{
	int p,q,n,k=0;
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	f>>n;
	for (p=1;p<=n;p++)
		for (q=1;q<=n;q++)
			if (ired(p,q))
				k++;
	g<<k;
	f.close();
	g.close();
}