x=2+平方[8];z=30;(*z=#序列中的项*)
f[x_]:=楼层[x];c[x_]:=天花板[x];
p1[0]=f[x];p2[0]=f[x];p3[0]=c[x];p4[0]=c[x];
p1[n]:=f[x*p1[n-1]]
p2[n_]:=如果[Mod[n,2]==1,c[x*p2[n-1]],f[x*p2[n-1]
p3[n_]:=如果[Mod[n,2]==1,f[x*p3[n-1]],c[x*p3[n-1]
p4[n]:=c[x*p4[n-1]]
t1=表[p1[n],{n,0,z}](*此序列*)