一元二次方程ax^2+bx+c=0的解x VB怎么写?

来源：学生作业帮助网编辑：作业帮时间：2024/04/30 14:13:44

一元二次方程ax^2+bx+c=0的解x VB怎么写?
一元二次方程ax^2+bx+c=0的解x VB怎么写?

一元二次方程ax^2+bx+c=0的解x VB怎么写?
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer
Dim m As Integer,x1 As Integer,x2 As Integer
a = Text1.Text
b = Text2.Text
c = Text3.Text
m = b ^ 2 - 4 * a * c
If a = 0 Then
Print wrong
Else
Select Case m
Case Is > 0
x1 = (-b + Sqr(m) / (2 * a))
x2 = (-b - Sqr(m) / (2 * a))
Print "不相等的两根 x1=" & x1 & ",x2=" & x2
Case 0
x1 = x2 = (-b / (2 * a))
Print "相等的两根 x1=x2 =" & x1
Case Is < 0
Print "No Real"
End Select
End If
End Sub

一元二次方程ax^2+bx+c=0的解x VB怎么写? 若（x+5)(x-2)=ax²+bx+c,则一元二次方程ax²+bx+c=0的解是? 解关于X的一元二次方程ax²+bx+c=0 用配方法解关于x的一元二次方程ax+bx+c=0! 二元一次方程ax^2+bx+c的虚数解是什么?ax^2+bx+c=0,一元二次方程一元二次方程ax^2+bx+c=0的解x VB代码及添加的控件用VB解一元二次方程ax^2+bx+c=0的流程图 1、编写一程序,求一元二次方程ax^2+bx+c=0(a0)的解解一元二次方程的公式ax²+bx+c= 一元二次方程ax²+bx+c=0的公式一元二次方程ax^2+bx+c=0求根公式已知x1,x2是一元二次方程ax^2+bx+c=0的两个根,求证ax^+bx+c=a(x-x1)(x-x2) 一元二次方程ax^2+bx+c=o两实数根为2和3.求一元二次方程cx^2+bx+a=0的解已知关于x的一元二次方程ax²+bx+c=0的系数满足ac 已知二次y=ax²+bx+c（a≠0）的图象如图所示,则关于x的一元二次方程ax²+bx+c的解是一元二次方程ax^2+bx+c=0的实数根和抛物线y=ax^2+bx+c与x轴的交点坐标有什么关系已知关于x的一元二次方程ax^2+bx+c=0的两个根是2和3,则多项式ax^2+bx+c可分解为? 一元二次方程f(x)=ax^2+bx+c的判别式是多少给好评