Cod sursa(job #3251410)

Utilizator elisabetastroescuElisabeta Stroescu elisabetastroescu Data 25 octombrie 2024 22:26:50
Problema Pascal Scor 0
Compilator cpp-64 Status done
Runda cex_1 Marime 0.59 kb
#include <iostream>
#include <cmath>
using namespace std;
int r,d,i,v[5000100],nr;
typedef int NrMare[10010];
int Divide(NrMare x,int n)
{
    int i,r=0;
    for(i=x[0];i>0;i--)
    {
        r=10*r+x[i];
        x[i]=r/n;
        r%=n;
    }
    for(;x[x[0]]==0&&x[0]>1;)
        x[0]--;
        return r;
}
int main()
{
    cin>>r>>d;
    v[0]=0;
    for(int i=1;i<=r;i++)
    {
        v[i]=1;
        for(int j=i-1;j>0;j--)
            v[j]=v[j]+v[j-1];
        v[0]=1;
    }
    for(int j=1;j<=r;j++)
       if(Divide(v,d)==0)nr++;
    cout<<nr;
    return 0;
}