Cod sursa(job #2673326)

Utilizator Razvan48Capatina Razvan Nicolae Razvan48 Data 16 noiembrie 2020 16:11:19
Problema Pascal Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.45 kb
#include <fstream>

using namespace std;

int main()
{
    ifstream in("pascal.in");
    ofstream out("pascal.out");
    int r, d;
    int sol = 0;

    in >> r >> d;
    long long val = r;

    if (r % d == 0)
    {
        sol++;
    }

    for (int i = 2; i <= r; i++)
    {
        val = val * (r - i + 1) / i;
        if (val % d == 0)
        {
            sol++;
        }
    }

    out << sol << '\n';

    return 0;
}