Cod sursa(job #249551)

Utilizator loginLogin Iustin Anca login Data 28 ianuarie 2009 19:09:31
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.95 kb
# include <fstream>
# include <math.h>
using namespace std;
int main ()
{
    int n, i, j, pp, k, t, r=0;
    ifstream fin ("fractii.in");
    ofstream fout ("fractii.out");
    fin>>n;
    for (i=1;i<=n;i++)
        for (j=i;j<=n;j++)
        {
            
            pp=1;
            if (i<j)
            {   
               t=i;
               if (j%i==0 && i!=1)
                  pp=0;
            }
            else
            {
                t=j;
                if (i%j==0 && j!=1)      
                   pp=0;
            }
            if (i==j && i!=1 && j!=1)
               pp=0;
            if (i%2==0 && j%2==0)
               pp=0;
            else
                for (k=3;k<=t/2 && pp;k+=2)
                    if (i%k==0 && j%k==0)
                       pp=0;
            if (pp && i!=j)
               r+=2;
            if (pp && i==j)
               r++;

        }
    fout<<r;
    return 0;
}