Cod sursa(job #1087504)
Utilizator | Data | 19 ianuarie 2014 15:09:52 | |
---|---|---|---|
Problema | Pascal | Scor | 20 |
Compilator | c | Status | done |
Runda | Arhiva de probleme | Marime | 0.44 kb |
#include <stdio.h>
#define IN "pascal.in"
#define OUT "pascal.out"
int main(void)
{
long r, d, i, n, rez;
freopen(IN, "r", stdin);
freopen(OUT, "w", stdout);
scanf("%ld %ld", &r, &d);
n = 1;
rez = 0;
for (i = 1; i <= r; i++) {
n = n * (r + 1 - i) / i;
if (n % d == 0)
++rez;
}
printf("%ld\n", rez);
return 0;
}