编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.

来源：学生作业帮助网 编辑：作业帮 时间：2024/11/24 01:56:38
编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.
xSMKP+8 H[tV}^RЉQȲupU ELBXĕan B}s=,k߹k[cuwx;$4~[prLFm}&o5A5mVWwG'$4{8dsDLlw]s79?tӺ˯v^۬~㹧Eg%K¨8D@1v֮Б)Rㇷ 'J_AqfJBHh,7b8Y]bEBRtÜ^VtU # CxRoчlf8SL̓ Ţ%[|>EIQHi-\֟A!50Ybq~b?0&!6Y^ZLIV$c;ư4DYJ YI!گ~C7en_>

编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.
编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.

编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.
以下是核心算法：其中Text1,Text2,Text3是三个文本输入框,接受a,b,c三个系数.x1,x2为根
Dim a As Single,b As Single,c As Single,d As Single,ds As Single
Dim x1 As String,x2 As String
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
d = b * b - 4 * a * c
ds = Sqr(Abs(d))
If d > 0 Then
x1 = Str((-b + ds) / 2 * a)
x2 = Str((-b - ds) / 2 * a)
ElseIf d = 0 Then
x1 = Str(-b / 2 * a):x2 = x1
Else
b = Round(-b / (2 * a),7):c = Round(ds / (2 * a),7)
x1 = Str(b) + "+" + Str(c) + "i"
x2 = Str(b) + "-" + Str(c) + "i"
End If
——————————————————————转贴

编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2. 编写一个函数,求标准的一元二次方程ax2+bx+c=0的根,要求方程的系数都可以以主程序输入来改变? 用VB编写一个解一元二次方程 AX2+BX+C=0的程序 编辑函数文件,根据用户输入的a、b、c的值,求一元二次方程 ax2 + bx + c = 0 的根,显示结果.用matalb编写,求M文件,急 解一元二次方程ax2+bx+c=0的解.c语言编程求代码 C语言,求一元二次方程ax2+bx+c=0的根. 求一元二次方程ax2+bx+c=0韦达定理计算公式. 如何解一元二次方程 ax2+bx+c=0 一元二次方程ax2+bx+c=0的一个根是一 1、编写一程序,求一元二次方程ax^2+bx+c=0(a0)的解 二次函数y=ax2+bx+c的图象和x轴交点的坐标与一元二次方程ax2+bx+c=0的根有什么关系? 二次函数y=ax2+bx+c经过二三四象限,则一元二次方程ax2+bx+c根的情况是 c语言一元二次方程求系数编写完整程序：输入平面上三个点的坐标值(即依次输入6个数),求通过这三个点的二次函数f(x)=ax2+bx+c的系数a、b、c的值.能具体写下程序吗 用java 编写一程序,求解一元二次方程：aX2+bX+c=0.参数a、b及c从命令行做参数输入 java 2. 编写一程序,求解一元二次方程：aX2+bX+c=0.参数a、b及c从命令行做参数输入 用Java编写一程序,求解一元二次方程：aX2+bX+c=0.参数a、b及c从命令行做参数输入 若一元二次方程aX2（平方）+bX+c的系数之和满足a+b+c=0,求这个一元二次方程的根. 求一元二次方程阿ax2（方）+bx+c=0的根（包括实根和复根）急.