Cod sursa(job #3187325)

Utilizator Padurariu_RiccardoPadurariu Riccardo Padurariu_Riccardo 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;
}