Cod sursa(job #2801691)

Utilizator XelaethAlexandru Obreja Xelaeth Data 16 noiembrie 2021 19:26:32
Problema Fractii Scor 10
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 1.55 kb
#include <iostream>
#include <fstream>

using namespace std;
/*
joucl flip
    ifstream intrare("flip.in");
    ofstream iesire("flip.out");
    int m,n, sumatotala = 0;
    intrare>>m>>n;
    for(int i = 1; i<=m; i++)
    {
        int suma = 0;
        for(int j = 1; j<=n; j++)
        {
            int x;
            intrare>>x;
            suma+=x;
        }
        if(suma<-suma)
            suma*=-1;

        sumatotala+=suma;
    }
    iesire<<sumatotala;
*//*for(int j = 1; j<=n; j++)
        {
            int q = i, p = j;
            if(p>q)
                swap(p,q);
            while(q%p!=0)
            {
                int r = q%p;
                q = p;
                p = r;
            }
            if(p==1)
                nr++;
        }*/
int main()
{
    ifstream intrare("fractii.in");
    ofstream iesire("fractii.out");

    int n, nr = 0, v[100];
    intrare>>n;
    for(int i = 1; i<=n; i++)
    {
        int nrcrt=1, nrfractii= 0;
        for(int k = 2; k<=i/2; k++)
            if(i%k==0)
            {
                v[nrcrt] = k;
                nrcrt++;
            }
        v[nrcrt] = i;
        for(int j = 1; j<=n; j++)
        {
            int ok = 1;
            for(int o = 1; o<= nrcrt; o++)
                if(j%v[o]==0||v[o]%j==0)
                {
                    ok = 0;
                    break;
                }
            if(ok)
                nrfractii++;
        }
        nr+=nrfractii;
    }
    nr+=2*n-1;
    iesire<<nr;
    return 0;
}