Cod sursa(job #2615468)

Utilizator mariaghinescu22Ghinescu Maria mariaghinescu22 Data 14 mai 2020 17:18:37
Problema Pascal Scor 10
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <iostream>
#include <fstream>

using namespace std;

ifstream in("pascal.in");
ofstream out("pascal.out");

const int N = 5000001;
int r, d, nr, cnt, v[N];

int fact(int n) {
	if (n == 0) return 1;
	return fact(n - 1) * n;
}

int main() {
	in >> r >> d;
	nr = r + 1;
	for (int i = 1; i <= nr / 2; i++) {
		v[i] = fact(r) / (fact(r - i) * fact(i));
		if (v[i] % d == 0 ) cnt += 2;
	}
	out << cnt - 1;
	return 0;
}