Cod sursa(job #784258)

Utilizator asasinulmortiiRobert Ciobanu asasinulmortii Data 5 septembrie 2012 13:34:23
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include <fstream>
#include <iostream>
using namespace std;
ifstream fin("fractii.in");
ofstream fout("fractii.out");
int is_ok(long a, long b){
  long r;
  for (r=a%b; r>0; a=b,b=r,r=a%b){;}
  return b==1?1:0;
}
int main(){
  
  long n,i,j,cont;
  cont=0;
  fin>>n;
  for (i=1; i<=n; i++){
	for (j=1; j<=n; j++)
	  if (is_ok(i,j)) cont++;
  }
  fout<<cont<<endl;
  return 0;
}