Cod sursa(job #3187325)
Utilizator | Data | 28 decembrie 2023 14:22:21 | |
---|---|---|---|
Problema | Pascal | Scor | 0 |
Compilator | cpp-64 | Status | done |
Runda | Arhiva de probleme | Marime | 0.38 kb |
#include <iostream>
using namespace std;
int main()
{
int a[1001][1001],R,D,i,j,c=0;
cin >> R >> D;
for(i=1;i<=R;i++){
a[i][1] = 1;
a[i][i] = 1;
}
for(i=1;i<=R;i++)
for(j=1;j<R;j++)
a[i][j] = a[i-1][j] + a[i-1][j-1];
for(i=2;i<=R-1;i++)
if(a[R][i]%D==0)
c++;
cout << c;
return 0;
}