Cod sursa(job #1116791)

Utilizator mysu02Mihaita Cornestean mysu02 Data 22 februarie 2014 20:19:22
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.52 kb
#include <fstream>

using namespace std;

int divizor(int a,int b)
{int i,min,div=0;
 if(a<b)
 min=a;
 else
 min=b;
 for(i=2;i<=min;i++)
 {if(a%i==0 && b%i==0)
  {div=i;
   i=min;
  }
  if(div==0)
  return 1;
  else
  return 0;
 }
}
int main()
{fstream f("fractii.in",ios::in);
 fstream g("fractii.out",ios::out);
 short int nr,i,j;
 unsigned long n;
 f>>n;
 nr=2*(n-1);
 for(i=2;i<=n;i++)
 {for(j=2;j<=n;j++)
  {if (divizor(i,j)==1)
   nr++;
  }
 }
 g<<nr;
 f.close();
 g.close();
    return 0;
}