i: =n->最大值(n,0)+1:d:=n->最小值(n-1,-1):
b: =proc(n,x,y,z,u,v,w)选项记忆;
`如果`(n=0,1,`如果`(x>y,b(n,y,x,w,v,u,z),
b(n-1,d(x),d(y),z,i(u),i(v),w)+
`如果`(min(y,z)<=0或x=-1,
b(n-1,d(y),d(z),u,i(v),i(w),x),0)+
`如果`(min(z,u)<=0或y=-1,
b(n-1,d(z),d(u),v,i(w),i(x),y),0)+
`如果`(min(v,
b(n-1,d(v),d(w),x,i(y),i(z),u),0)+
`如果`(min(w,x)<=0或y=-1,
b(n-1,d(w),d(x),y,i(z),i(u),v),0))
结束时间:
a: =n->`如果`(n=0,1,6*b(n-1,-1$2,0,1$2,O)):
seq(a(n),n=0..20);