搜索: a182745-编号:a182746
|
|
|
|
3, 5, 2, 4, 2, 2, 7, 3, 2, 2, 3, 2, 2, 2, 2, 6, 3, 2, 2, 2, 2, 5, 3, 3, 2, 2, 2, 2, 9, 4, 2, 2, 2, 2, 2, 2, 5, 2, 2, 2, 2, 2, 2, 2, 2, 4, 3, 2, 2, 2, 2, 2, 2, 2, 2
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,1
|
|
评论
|
|
|
链接
|
|
|
例子
|
数组开始:
3,2,2,2,2,2,2,2,2,2,2,
5,2,2,2,2,2,2,2,2,2,
4,3,2,2,2,2,2,2,2,2,
7,2,2,2,2,2,2,2,2,
3,3,3,2,2,2,2,2,2,2,
6,3,2,2,2,2,2,2,2,
5,4,2,2,2,2,2,2,2,
9,2,2,2,2,2,2,2,
5,3,2,2,2,2,2,2,2,2,
4,4,3,2,2,2,2,2,2,
8,3,2,2,2,2,2,2,
7,4,2,2,2,2,2,2,
6,5,2,2,2,2,2,2,
11,2,2,2,2,2,2,
4,3,3,3,2,2,2,2,2,
7,3,3,2,2,2,2,2,
6,4,3,2,2,2,2,2,
5,5,3,2,2,2,2,2,
10,3,2,2,2,2,2,
5,4,4,2,2,2,2,2,
9,4,2,2,2,2,2,
8,5,2,2,2,2,2,
7,6,2,2,2,2,2,
|
|
MAPLE公司
|
cmpL:=proc(a,b)局部i;对于i从1到min(nops(a),nops(b)),如果op(i,a)<op(i,b),则返回-1;elif op(i,a)>op(i、b)然后返回1;结束条件:;结束do;如果nops(a)>nops(b),则返回1;elif nops(a)<nops(b),然后返回-1;否则返回0;结束条件:;结束进程:
pShell最小值:=proc(p)局部idx,j;idx:=1;对于从2到nops(p)的j,如果cmpL(op(j,p),op(idx,p))<0,则idx:=j,则do;结束条件:;结束do;返回idx;结束进程:
A141285rowf:=进程(n)局部p;如果n<=1,则[n];else psort:=[];p:=组合[分区](n);当nops(p)>0时,做m:=pShellMin(p);mmi:=最小值(op(op(m,p)));如果mmi>1,则mma:=最大值(op(op(m,p)));psort:=[op(psort),排序(op(m,p),`>`)];结束条件:;p:=底土(m=NULL,p);结束do:psort;结束条件:;结束进程:
对于从1到17乘2的n,做shl:=A141285rowf(n);对于shl-do中的r,对于r-do printf中的k(“%d,”,k);结束do:printf(“\n”);结束do:printf(“\n”);结束do:#R.J.马塔尔2010年12月3日
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|