Cod sursa(job #155685)

Utilizator krateCiurdariu Dan krate Data 12 martie 2008 08:38:20
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
int cmmdc(int a,int b)
 {
  int r;
  r=a%b;
  while(r)
   {
    a=b;
    b=r;
    r=a%b;
   }
  return b;
 }
int main()
 {int k=0,i,n,j;
  f>>n;
  for(i=1;i<=n;i++)
    for(j=1;j<=n;j++)
	if(cmmdc(i,j)==1) k++;
  g<<k;
  return 0;
 }