一元二次方程ax^2+bx+c=0的解x VB怎么写?
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/10 09:02:48
一元二次方程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的判别式是多少 给好评