Cod sursa(job #122686)

Utilizator IulyanutzFMI Danea Iulian Iulyanutz Data 13 ianuarie 2008 14:26:08
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include<fstream.h>
ifstream f("fractii.in");
ofstream g("fractii.out");
unsigned long int n,i,j,k;
int prime(unsigned long int a,unsigned long int b)
{
    unsigned long int i ;
       for(i=2;i<=a;i++)
	  if(a%i==0&&b%i==0)
	     return 0;
    return 1;
}
int main()
{
   f>>n;
   k+=n;
   k+=n-1;
   k+=n;
   k-=2;
   k+=n;
   if(n%2==0)
      k+=n-4;
   else
      k+=n-3;
   if(n%2)
     k+=1;
   for(i=5;i<=n;i++)
     for(j=i+1;j<=n;j++)
       if(i%j!=0)
	 if(prime(i,j))
	    k=k+2;

   g<<k;
   return 0;
}