用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/10 05:30:58
用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,

用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2
用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2

用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2
dim a ,b,c,x1,x2,d
a =val(inputbox("请输入系数a"))
b =val(inputbox("请输入系数b"))
c =val(inputbox("请输入系数c"))
d=b^2-4*a*c
if d>0 then
x1=(-b+sqr(d))/2
x2=(-b-sqr(d))/2
elseif d=0 then
x1=-b/2
x2=x1
else
msgbox "方程无实根!"
end if

用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2 vb 一元二次方程 输入一元二次方程 ax^2+bx+c=0的系数a、b、c、计算并输出一元二次方程的两个根、x1、x2 用VB解一元二次方程ax^2+bx+c=0的流程图 一元二次方程ax^2+bx+c=0的解x VB怎么写? 求一元二次方程ax^2+bx+c=0的根.用VB语言怎么编?知道的都来帮帮忙,急. 一元二次方程ax^2+bx+c=0的解x VB代码及添加的控件 求助:vf编程 输入一元二次方程的系数a,b,c的值,编程求解一元二次方程ax^(2)+bx+c=0 编写程序:输入a,b,c三个数,求一元二次方程ax^2+bx+c=0的根 一元二次方程ax^2+bx+c=0求根公式 已知一元二次方程不等式ax^2+bx+c 若一元二次方程ax^2+bx+c(ac 用MATLAB求解一元二次方程ax^2 +bx+c=0的根 用配方法解一元二次方程ax^2+bx+c=0(a不等于0) 用VB编写一个解一元二次方程 AX2+BX+C=0的程序 用VB编程,用select case语句实现,计算一元二次方程ax^2+bx+c=o的实根.有以下几种情况:1,a=0,不是一元二次方程2,b^2-4ac=0,有两个相等的实根3,b^2-4ac>0,有两个不相等的实根 怎样用vb求一元两次方程ax^2+bx+c=0的根? ax平方+BX+C等于0一元二次方程怎么做a是已知数 vb程序改错 求解一元二次方程(ax^2+bx+c=0)的程序求解一元二次方程(ax^2+bx+c=0)的程序Private Sub Command1_Click()Dim a As Integer,b As Integer,c As Integer,d As IntegerDim x1 As Single,x2 As SingleInputBox (a=)InputBox