Cod sursa(job #37464)

Utilizator mrpopescuPopescu Mihai Tudor mrpopescu Data 25 martie 2007 10:06:09
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
Raporteaza aceasta sursa 
#include <iostream>
#include <fstream>

using namespace std;

long n,nr;
long ired(long x,long y){
 long r;
	do{
		r=x%y;
		x=y;
		y=r;
	}while(y!=0);
 return x;
 }	 
int main(){
std::ifstream in("fractii.in");
std::ofstream out("fractii.out");
in>>n;
for (long i=1;i<=n;i++)
 for (long j=1;j<=n;j++)
  if(ired(i,j)==1) nr++;
out<<nr;
}