F: =(n,k)->(<0|1>,<1|k>>^n)[1,2]:
a: =n->加(F(-j,n-j),j=0..n):
seq(a(n),n=0..30);
#第二个Maple项目:
F: =proc(n,k)选项记忆;
`如果`(n<2,n,k*F(n-1,k)+F(n-2,k))
结束时间:
a: =n->加(F(j,j-n),j=0..n):
seq(a(n),n=0..30);
#第三个Maple项目:
a: =n->加(组合[fibonacci](j,j-n),j=0..n):
seq(a(n),n=0..30);