#include <bits/stdc++.h>
#define il inline
using namespace std;
typedef long long ll;ll mod;
il void add(ll &x,ll y){x=(x+y>=mod?x+y-mod:x+y);}
il void del(ll &x,ll y){x=(x<y?x-y+mod:x-y);}
il ll qp(ll a,ll b){
ll ans=1ll;
while(b){
if(b&1) ans=(ans*a)%mod;
a=(a*a)%mod,b>>=1;
}return ans;
}
const int N=803;
int n;ll f[N][N],fac[N],inv[N];
il void init(){
fac[0]=1ll;for(int i=1;i<=n;++i) fac[i]=(fac[i-1]*1ll*i)%mod;
for(int i=1;i<=n;++i) inv[i]=qp(i,mod-2ll);
}
int main(){
//freopen("qoj8047_0.in","r",stdin);
scanf("%d%lld",&n,&mod);init();if(n<=1){printf("1");exit(0);}
f[1][0]=1ll;
for(int i=2;i<n;++i)
for(int k=0;k<=i;++k){
f[i][k]=f[i-1][k+1]
if(!k) add(f[i][0],f[i-1][0]);
for(int j=1;j<=i-k;++j){
add(f[i][k],f[j-1][0]*f[i-j][k]%mod);
if(k) del(f[i][k],(f[j-1][0]+(j==1))*f[i-j][k-1]%mod);
}
f[i][k]=(f[i][k]*inv[i])%mod;
}
printf("%lld",f[n-1][0]*fac[n-1]%mod);
return 0;
}