b： =proc（x，y，h，t）选项记忆`如果`（y<0或y>x，0，
`如果`（x=0，`如果`（h>1,0,1），`如果'（t=1和abs（y-h）<>1,0，
b（x-1，y-1，`if`（t=1，y，h），0））+b（x-l，y+1，h，1））
结束时间：
a： =n->b（2*n，0$3）：
seq（a（n），n=0..50）；
#第二个Maple项目：
b： =proc（x，y）选项记忆；（t->
`if`（x=t，1，`如果`（x<t，0，b（x-1-2*y，y+1）+加法（add(
b（x-1-2*i，y+j），j=[-1，1]），i=1.y-1）））（3*y-2）
结束时间：
a： =n->`如果`（n=0，1，b（2*n-1，1））：
seq（a（n），n=0..50）；
