# include <fstream.h>
unsigned long min(long a,long b)
{if(a<b) return a;else return b;}
int  main()
{unsigned long n,k,j,nr=0,v[10],t; int d; for(k=1;k<=7;k++) v[k]=0;
ifstream fin("pascal.in");
fin>>n>>d;  fin.close();
for(k=1;k<=n/2;k++)
 { t=n-k+1;j=2;
     while (t>1 && j<=5)
     {if(t%j==0) {v[j]++; t=t/j;}else j++;} v[4]=v[2]/2; v[6]=min(v[2],v[3]);
     t=k;j=2;
     while (t!=0 && j<=5)
     {if(t%j==0) {v[j]--; t=t/j;}else j++;} v[4]=v[2]/2; v[6]=min(v[2],v[3]);


     if(v[d]>=1) if(n%2==0 && k==n/2) nr++;else nr+=2; }
 ofstream fout("pascal.out");

fout<<nr;fout.close();
return 0;
}