Cod sursa(job #1193795)

Utilizator iustintomaToma Iustin iustintoma Data 1 iunie 2014 20:10:46
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <fstream>

using namespace std;

int main ()
{
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	unsigned n, p, q, d, k=0;
	bool da;
	f>>n;
	for (p=1;p<=n;p++)
		for (q=1;q<=n;q++)
		{
			if (p<=q)
				{
					for (d=2, da=1;d<=p;d++)
						if (!(p%d)&&!(q%d))
						{
							da=0;
							break;
						}
				}
			else for (d=2, da=1;d<=q;d++)
						if (!(p%d)&&!(q%d))
						{
							da=0;
							break;
						}
			if (da)
				k++;
		}
	g<<k;

	return 0;
}