%I#17 2024年5月1日17:02:25

%S 1012364668381330191828623856535070968622105581265415228，

%电话：1809021550249162770231500350683929845322512405698062398，

%电话：661306995877854862309661810688115842124342133122144090

%N多项式中x^2的系数（x-p（N））*（xp（N+1））*。

%H Harvey P.Dale，n的表，n=1..1000的a（n）</a>

%H Eric Weistein的《数学世界》，<a href=“http://mathworld.wolfram.com/VietasFormulas.html“>维埃塔公式</a>

%F a（n）=p（n）*p（n+1）+p（n_Emeric Deutsch，2007年1月20日

%e a（1）=101，因为（x-2）*（x-3）*（x-5）*（x7）=x^4-17x^3+101x^2-247x+210。

%p a:=n->系数（展开（（x-ithprime（n））*（x-ithprime（n+1））*_Emeric Deutsch，2007年1月20日

%t表[素数[x]素数[x+1]+素数[x]素数[x+2]+素数[x]素素[x+3]+素素[x+1]素数（x+2]+素数（x+1]素数）[x+3]+素数【x+2】素数[x+3]，{x，1，100}]

%t总计[Times@@@Subsets[#，{2}]]和/@Partition[Prime[Range[40]]，4,1]（*Harvey P.Dale_，2019年4月15日*）

%o（PARI）1。{m=35；k=3；对于（n=1，m，打印1（总和（i=n，n+k-1，总和（j=i+1，n+k，素数（i）*素数（j）），“，”）}2。{m=35；k=3；对于（n=1，m，print1（abs（polceoff（prod（j=0，k，（x-prime（n+j）），2）），“，”）}\\_Klaus Brockhaus_，2007年1月21日

%Y参考A127345、A127346、A127347、A127349、A127350、A127351、A070934、A006094。

%K nonn公司

%O 1,1号机组

%A _Artur Jasinski，2007年1月11日

%E编辑：德国工程师协会和克劳斯·布罗克豪斯，2007年1月20日