Cod sursa(job #2910561)

Utilizator Robert_MitriRobert Mitri Robert_Mitri Data 22 iunie 2022 11:59:45
Problema Pascal Scor 30
Compilator cpp-64 Status done
Runda 3_iulie Marime 0.51 kb

#include <fstream>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");

int n,d;
int ra[5000001];
int rc[5000001];
int main()
{
    fin>>n;
    fin>>d;
    ra[1]=1;
    for(int i=2;i<=n+1;i++)
    {
        for(int j=1;j<=i;j++)
        {
            rc[j]=ra[j]+ra[j-1];
        }
        for(int j=1;j<=i;j++)
        {
            ra[j]=rc[j];
        }
    }
    int ap=0;
    for(int i=1;i<=n+1;i++)
    {
        ap+=(rc[i]%d==0);
    }
    fout<<ap;

}