#包括“comb/partition-dist-asc.h”#包括“aux0/fibonacci.h”#包括“sort/bsearch.h”#包括“aux0/factorial.h”#包括“fxtio.h”#包括“jjassert.h”#包括“fxttypes.h”#包括“nextarg.h”//%OEIS序列A218396://%组成不同的(非零)斐波那契数。//%还有A032021:组成不同的奇数。//%还有A000119:划分成不同的斐波那契数。//%另外A000700:划分为不同的奇数。//请参阅comb/partition-dist-asc-demo.cc,将其划分为不同的部分,作为弱升序组合//参考comb/partition-demo.cc,针对以部件多重性给出的分区//参见seq/A179080-demo.cc,将分区划分为不同的部分,相邻部分具有不同的奇偶校验。//#定义TIMING//取消注释以禁用打印#定义N 32ulong标准[N];//允许的集合整数main(int argc,char**argv){ulong n=37;NXARG(n,“通过整数分区从集合合成不同的部分”);布尔fq=真;NXARG(fq,“是否使用斐波那契数(否则为奇数)”);partition_dist_asc P(n);如果(fq)适用于(ulong k=0;k=n);//fixme:奇数需要更多元素ulong pct=0;//count分区ulong cct=0;//计数成分constulong*x=P.数据();ulong m=P.m_;{{//仅限fibsbool q=真;对于(ulong k=0;k1?“s”:“”)<<“)”;cout<<endl;贾塞尔特(P.OK());#endif//计时}while((m=P.next()));cout<<“pct=”<<pct<<endl;cout<<“cct=”<<cct<<endl;返回0;}// -------------------------/*//不同的斐波那契数、组成(A218396):echo$(表示$中的n(序列1 25);这样做/bin$n 1|g-F'cct='|切割-d=-f2;done)|sed的//,/g;'1, 1, 3, 2, 3, 8, 2, 9, 8, 8, 32, 6, 9, 32, 8, 38, 30, 32, 150, 6, 33, 32, 32, 158, 30//比较A076739:组成斐波那契数//不同的斐波那契数、分区(A000119):echo$(表示$中的n(序列1 25);这样做/bin$n 1|g-F'pct='|剪切-d=-f2;完成)|sed的//,/g;'1、1、2、1、2、1、3、2、2、3、1、3、3、2、4、2、3、3、1、4、3、3、5、2//不同奇数、成分(A032021):echo$(表示$中的n(序列1 25);这样做/bin$n 0|g-F'cct='|切割-d=-f2;done)|sed的//,/g;'1, 0, 1, 2, 1, 2, 1, 4, 7, 4, 7, 6, 13, 6, 19, 32, 25, 32, 31, 58, 43, 82, 49, 132, 181//不同奇数、分区(A000700):echo$(表示$中的n(序列1 25);这样做/bin$n 0|g-F'pct='|切割-d=-f2;done)|sed的//,/g;'*////Emacs公司:///局部变量:///MyRelDir:“演示/序列”///makefile-dir:“../../”///make-target:“1demo DSRC=demo/seq/A218396-demo.cc”///make-target2:“1demo DSRC=demo/seq/A218396-demo.cc DEMOFLAGS=-DTIMING”///结束时间: