题目

对分查找算法可用于求解方程的近似解。现要求方程x3-4x2+x+5=0的一个近似解，可设f（x）=x3-4x2+x+5，若有区间[a，b]，使f（a）与f（b）异号，则该区间内必存在该方程的一个解。小吴为比编写了VB程序，功能如下：分别在本框Text1和Text2中输入求解的区间值a和b（a<b），单击“计算”按钮Command1，若该区间必有解，则求解出该区间内的一个近似解（精确到10-5）否则提示“重新输入区间”，计算后的相关结果显示在列表框List1中。程序运行界面如下图所示。 实现上述功能的VB程序如下，请在划线处填上合适的代码。 Private Sub Command1_Click() Dim a As Double, b As Double, m As Double, x As Double Dim ym As Double, yb As Double a=Val(Text1.text):b=Val(Text2.Text) If a>b Then t=a: a=b: b=t Do While   ①    m=(a+b)/2 ym=m^3-4*m^2+m+5 yb=b^3-4*b^2+b+5 If Abs(ym)<0.00001 Then Exit Do If    ②    Then b=m Else a=m End If Loop Text3.Text=Str(Int(m*10000)/10000) End Sub ① ②  答案：【1】a<= b【2】yb*ym>0

查看本题答案和解析