VB程序编程:画出求一元二次方程的流程图

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/09/20 15:33:08

VB程序编程:画出求一元二次方程的流程图
1:应该有实根的解
2：应该有虚根的解

以下是画一元二次方程的图的代码：（假设y=a*x^2+b*x+c,将窗口的大小调为4800×4800）
Private Sub Command1_Click()
Cls
Line (0, 2400)-(4800, 2400), RGB(255, 0, 0)
Line (2400, 0)-(2400, 4800), RGB(255, 0, 0)
Dim x
Dim xx
Dim y
Dim yy
Dim a
Dim b
Dim c
a = InputBox("请输入二次项系数(a)", "录入")
b = InputBox("请输入一次项系数(b)", "录入")
c = InputBox("请输入常数项(c)", "录入")
For x = -4800 To 4800 Step 0.5
y = a * x ^ 2 + b * x + c
xx = x + 2400
yy = -y + 2400
PSet (xx, yy), RGB(0, 0, 255)
Next x
End Sub
Private Sub Form_Activate()
Line (0, 2400)-(4800, 2400), RGB(255, 0, 0)
Line (2400, 0)-(2400, 4800), RGB(255, 0, 0)
End Sub
基于计算机的计算能力问题,画出来的图可能不准确,如果代入a=0的话就会画出直线,就可以说明我的代码是正确的了

VB程序编程:画出求一元二次方程的流程图：画出求一元二次方程的PAD流程图谢谢```` 编程计算一元二次方程的解 vb 编程编写一个程序求一元二次方程的解 Vb编程,编写一个一元二次方程的求解程序,要求能够判断方程是否有根求一元二次方程流程图完整的求解一元二次方程的程序流程图可称为（） VB编程程序计算:1!+2!+……10!的流程图几道VB的编程和流程图, 用VB解一元二次方程ax^2+bx+c=0的流程图编写程序计算s=1+3+5+...+n求s=100得值,请画出流程图,并写出相应的VB语句代码设计求解一元二次方程ax2+bx+c=0的一个算法,并画出流程图