Cod sursa(job #2723298)

Utilizator BalogOctavianBalog Octavian Gheorghe BalogOctavian Data 13 martie 2021 21:05:14
Problema Fractii Scor 0
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.66 kb
#include <fstream>
#include <cmath>
using namespace std;

ifstream f("fractii.in");
ofstream g("fractii.out");

// cu cate nr este prim x

int main()
{
    int n,s=0;
    f >> n;

    int v[n + 1];

    for(int i = 1 ; i <= n ; i ++) v[i] = i;
    for(int i = 2;  i <= n ; i ++)
        if(v[i] == i)
        {
            v[i] --;
            for(int j = 2 ; j * i <= n ; j ++)
                v[j * i]= v[j * i] / i * (i - 1);
        }

    for(int i = 1; i <=n; i++)
    {
        for(int j = 1; j<=n; j++)
        {
            int p = pow(i,v[j]);
            if (p % j == 1 % j) s++;
        }
    }
    g << s;
    return 0;
}