Cod sursa(job #10599)

Utilizator andrei.12Andrei Parvu andrei.12 Data 28 ianuarie 2007 19:09:47
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
using namespace std;
#include<fstream>
int main(){
	ifstream f("fractii.in");
	ofstream g("fractii.out");
	long long n, p, nr, q, t, r, aux;
	f>>n;
	p=1;
	nr=0;
	while (p<=n){
		q=1;
		while (q<=n){
			t=p;
			r=q;
			while (t%r!=0){
				aux=r;
				r=t%r;
				t=aux;
			}
			if (r==1) nr++;
			q++;
		}
		p++;
	}
	g<<nr;
	return 0;
}