v
32
0
17?
1

:= polyroots v( )
1.32158?
1.43378
16.8878

=
4,Given...Find,方 法 调 用 求 解 模 块 调 用 之 前 首 先 设 置 猜 测 值
x 2?:= Given x3 17x2? 32+ 0= Find x( ) 1.32158?=
x 1:= Given x3 17x2? 32+ 0= Find x( ) 1.43378292=
x 17:= Given x3 17x2? 32+ 0= Find x( ) 16.88779712=
roots a b,c,( )
x1 b? b
2 4 a? c+
2 a?←
x2 b? b
2 4 a? c
2 a?←
b2 4 a? c?≥if
error " "根 为 复 数( ) otherwise
x1
x2

:=
roots 2 5,3,( ) 1?1.5=
roots 2 2,3,( ) 00=
21 实 验 求 方 程 根 的 函 数
Mathcad,本 文 档 将 给 出 用 计 算 方 程 根 的 方 法
求 方 程 x3 17x? 32+ 0= (-2,-1) 在 区 间 (1,2) (16,17),、, 中 的 根
1,root f(x),x,[a,b]方 法 调 用 ( ) 函 数 直 接 计 算
g x( ) x3 17x2? 32+:=
root g x( ) x,2?,1?,( ) 1.32158?= root g x( ) x,1,2,( ) 1.43378= root g x( ) x,16,17,( ) 16.8878=
2,方 法 首 先 设 置 猜 测 值
x1 2?:= x2 1:= x3 17:=
M
root g x1( ) x1,( )
root g x2( ) x2,( )
root g x3( ) x3,( )

:= M
1.3215968?
1.43378414
16.88779713

=
3,polyroots(v),v, 方 法 调 用 函 数 计 算 其 中 为 多 项 式 的 系 数 向 量
x3 17x2? 32+ coeffs x,
32
0
17?
1


1
roots a b,c,( ) break a 0=if
b2 4 a? c←
x1 b+2 a?←
x2 b2 a?←
x1 x2( )
:=
roots 4 8,3,( ) 0.5? 1.5?( )= roots 2 1,3,( ) 1?4 14 i? 23?+ 1?4 14 i? 23→
roots 0 3,1,( ) =
2