编辑
经核准的
(PARI)用于(n=1,5,打印1(“\n1”);对于(i=1,n-1,打印1(“,”i*n))\\查尔斯·格里特豪斯四世2015年5月21日
非n,表,改变,容易的
提出
按行读取的三角形,其中第n行 包含 是属于1和n-1最小 积极的与n有共同因子的数。
按行读取的三角形,其中第n行给予是1和 这个n-1与n具有公共因子的最小数。
行n给出的行读取的三角形 1 和n个-1与n有共同因子的最小数。
arow:=proc(n)局部L;
五十: =选择(t->igcd(t,n)>1,[$1..n^2]);
1,op(L[1..n-1]);
结束进程:
seq(arow(n),n=1..20)#罗伯特·伊斯雷尔2015年5月21日
姓名编辑人罗伯特·伊斯雷尔2015年5月21日
1; 1,2; 1,3,6; 1,2,4,6; 1,5,10,15,20; 1,2,3,4,6,8; 1,7,14,21,28,35,42; ...
1;
1, 2;
1, 3, 6;
1, 2, 4, 6;
1, 5,10,15,20;
1、2、3、4、6、8;
1, 7,14,21,28,35,42;
...