检验过的

经核准的

提出

检验过的

编辑

提出

发件人米歇尔·拉格诺，2024年3月15日：（开始）

我们为n=1.72定义了与a（n）相关的序列b（n）

考虑多项式：P（x）=31/79833600*x^12-1/33264*x^11+7417/7257600*x^10-2423/120960*x^9+604201/2419200*x^8-13831/6720*x^7+81637291/7257600*x^6-4777231/120960*x^5+146377769/1814400*x^4-1928113/30240*x^3-5278919/69300*x^2+4696999/2310*x^113具有x=1.13的整数值。

考虑由以下值定义的b（n）：b（P（x））=2代表x=1..13，b（m）=1代表m不同于P（x）。我们发现序列b（n）是a（n）的第一个差值。那么a（n）是b（n）的部分和，a（1）=1。

包括多项式P（x）的Maple程序给出了有限序列a（n）的所有值，还给出了相关序列b（n）。（结束）

P： =x->

31/79833600*x^12-1/33264*x^11+7417/7257600*x^10-2423/120960*x^9+604201/2419200*k^8-13831/6720*x^7+81637291/7257600*x^6-4777231/120960*x^5+146377769/1814400*x^4-1928113/30240*x^3-5278919/69300*x^2+469699/2310*x-113：

nn:=71:b:=数组（1..nn）：s:=1:lst:=｛1｝：

对于i从1到nn，请执行以下操作：

b[i]：=1：

日期：

对于从1到13的k，执行以下操作：

b[P（k）]：=2：

日期：

打印（b）：

对于从1到nn的j，do：

s： =s+b[j]：lst:=lst联合{s}

日期：

打印（lst）：

#米歇尔·拉格诺2024年3月15日

需求[“其他`ChemicalElements`”]

(* 第一 做 *) 需要["其他`化学元素`"] (* 然后 *) 表[Round[Sum[AtomicWeight（AT）Elements[[i]]，{i，n}]/n]，{n，111}](*罗伯特·威尔逊v2006年9月2日*）

非n,完成,改变,较少的

提出

编辑

编辑

提出

发件人_ Michel Lagneau，2024年3月15日：（开始）

来自Michel Lagneau，2024年3月15日：（开始）

考虑多项式：P（x）=31/79833600*x^12-1/33264*x^11+7417/7257600*x^10-2423/120960*x^9+604201/2419200*x^8-13831/6720*x个^7+81637291/7257600*x个^6-4777231/120960*x个^5+146377769/1814400*x个^4-1928113/30240*x个^三-5278919/69300*x个^2+469699/2310*x个-113 有 整数 值 对于 x个 = 1..13.

/6720*x^7+81637291/7257600*x^6-4777231/120960*x^5+146377769/1814400*x^4-1928113/30240*x^3-5278919/69300*x^2+469699/2310*x-113

x=1..13的整数值。

包含多项式P（x）的Maple程序给出了有限序列a（n）的所有值，也给出了相关序列b（n）。 (终点)

_Michel Lagneau，2024年3月15日

/*_Michel Lagneau，2024年3月15日*/

#米歇尔·拉格诺2024年3月15日

（*first-do*）Needs[“Miscellaneous`ChemicalElements`”]（*then*）Table[Round[Sum[AtomicWeight（AT）Elements[[i]]，{i，n}]/n]，{n，111}](*罗伯特·威尔逊v , 九月 02 2006 *)

提出

编辑

编辑

提出

/*_ Michel Lagneau，2024年3月15日*/