#pragma option -3 -a -Z -O2 -r
#include<iostream.h>
int Pascal(unsigned long x,unsigned long y)
{unsigned long i,a=1,b=1,c=1,d=1,p;
 if(y)
   {for(i=2;i<=x;i++)
     {a*=i;}
    for(i=2;i<=y;i++)
     {b*=i;}
    c=x-y;
    for(i=2;i<=c;i++)
     {d*=i;}
    p=a/(d*b);
   }
  else p=1;
return p;
}
int main()
{unsigned long x,j,r,p;
 int d,c;
 c=0;
 cout<<"R="; cin>>r;
 cout<<"D="; cin>>d;
 for(j=0;j<=r;j++)
   {p=Pascal(r,j);
    if(p%d==0) c++;
   }
 cout<<c<<'\n';
return 0;
}