李强设计了一个求一元三次方程x3+2x2-5x+2=0的近似实数根的Visual Basic程序.单击“求解”按钮Command1,程序在[-4,4]范围内求解,并将所有实数根显示在列表框List1中.程序运行界面如图所示:
李强的方法是:设f(x)=x3+2x2-5x+2,从-4开始到4为止,每隔一个求解精度e取一个x值,并求出f(x)和f(x+e)的值.若f(x)×f(x+e)≤0,则表示x和x+e的中点就是方程的一个近似解.
程序代码如下:
Private Sub Command1_Click ( )
Const e As Double=0.00001'e为求解精度
Dim s(1To 3)As String
Dim x As Double
Dim m As Double,k As Integer'm为实数解
s(1)=“x1“:s(2)=“x2“:s(3)=“x3“
k=0
For x=-4To 4-e Step e
If ①Or f(x+e)=0Then
k=k+1
If f(x+e)=0Then m=x+e Else m=x+e/2
m=Fix(m*10000+0.5)/10000'保留四位小数
List1.AddItem s(k)+“=“+②
End If
Next x
End Sub
'以下的自定义函数,用于求f(x)的值
Private Function f(x As Double) As Double
f=x*x*x+2*x*x-5*x+2
End Function
(1)解决此问题主要采用的算法是 枚举算法枚举算法.(选填:递归算法/枚举算法)
(2)在程序①和②,填入适当的语句或表达式,把程序补充完整:
程序中①应填入 f(x)=0f(x)=0.程序中②应填入 xx.
【考点】冒泡排序算法及其实现;编辑事件处理过程的代码.
【答案】枚举算法;f(x)=0;x
【解答】
【点评】
声明:本试题解析著作权属菁优网所有,未经书面同意,不得复制发布。
发布:2024/10/26 8:30:1组卷:20引用:2难度:0.1
相似题
-
1.有如下 Python 程序段:
运行后列表中的值可能是( )发布:2024/12/18 21:0:2组卷:5引用:3难度:0.3 -
2.用VB编写的函数bubble_sort是一个用冒泡方法实现排序的函数,其调用时需要三个参数:布尔类型参数sx来确定是升序还是降序,sx为True时为升序,否则为降序;整数型数组a
比如有一个整数型数组a(1 to 10)需要降序排序,可以直接这样调用:
a
该函数VB代码如下:
Function bubble_sort(sx As Boolean,a
Dim i,j,t As Integer
For i=1 To n-1
For j=
If
If a(j)<a(j-1)Then t=a(j):a(j)=a(j-1):a(j-1)=t
Else
If a(j)>a(j-1)Then t=a(j):a(j)=a(j-1):a(j-1)=t
End If
Next j
Next i
bubble_sort=a
End Function
请将代码补充完整:
①
②发布:2024/12/20 20:30:1组卷:23引用:2难度:0.3 -
3.用选择排序法对一组数据进行升序排序,第一趟排序结束后的顺序为2、6、9、3、7,则原始数据顺序不可能的是( )
发布:2024/12/18 23:0:1组卷:10引用:1难度:0.5