85问答库 > 高分求一段简单的mathematica程序，计算一个高阶多项式的解

高分求一段简单的mathematica程序，计算一个高阶多项式的解

2025-03-23 03:35:17

推荐回答（1个）

回答1：

Mathematica代码如下：
co ={a, b, c, d, e, f, g, h, i, j, k};
expr = co.x^Range[10, 0, -1]
NSolve[D[expr, {x, 2}] == 0, x]
因为方程次数高于5，所以一般只有数值解。
第一句是给系数赋初值，对应x次数由高到低（一定要先赋值，否则没法计算）。
第二句是产生表达式，这里用了矢量的标量积来缩减表达式。
第三句是求导，求数值解。
作为例子，比如：
co = Range[11];
expr = co.x^Range[10, 0, -1]
NSolve[D[expr, {x, 2}] == 0, x]