Cod sursa(job #370436)

Utilizator mebobBota Bogdan mebob Data 1 decembrie 2009 12:05:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<fstream.h>
long n,k,i,j,z;

long cmmdc()
{
if(j>i) z=i;
  else z=j;
while(z>1)
  if(i%z==0&&j%z==0) return z;
  else z--;
return z;
}

int main()
{
  ifstream in("fractii.in");
  in>>n;k+=n;
  for(i=2;i<=n;i++)
    for(j=1;j<=n;j++)
      if(cmmdc()==1) k++;
  ofstream out("fractii.out");
  out<<k;
  out.close();
  return 0;
}