ll@P,a=0;rep(i,P)a=(a*i+1)%P;wt((P-a)%P);