带(组合,分区):
evnbigrodd:=proc(n::nonnegint)
本地平均数,奇数,大数,零件,i,j;
大计数:=0;
分区:=分区(n);
对于从1到nop(分区)的i
平均数:=0;
奇数:=0;
对于从1到nops(分区[i])的j
如果(op(j,分区[i])mod 2<>0),则
奇数:=奇数+1
金融机构;
如果(op(j,分区[i])mod 2=0),则
平均数:=平均数+1
金融机构
外径;
偶数(evencount)然后
大数:=大数+1
金融机构
外径;
返回(bigcount)
结束程序;
序号(evnbigrodd(i),i=1..42);
#第二个枫树计划:
b: =proc(n,i,t)选项记住;`if`(n=0,
如果`(t<0,1,0),`if`(i<1,0,b(n,i-1,t)+
如果`(i>n,0,b(n-i,i,t+(2*irem(i,2)-1)))))
结束:
a: =n->b(n$2,0):
顺序(a(n),n=0..80)#海因茨2014年3月30日
|