用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2
来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:数学作业 时间:2024/05/08 22:50:54
用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
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
输入一元二次方程ax2+bx+c=0系数a,b,c的值,计算并输出一元二次方程的两个根x1和x2.
VB输入一元二次方程ax2+bx+c=0的系数a,b,c,计算并输出一元二次方程的两个根x1,x2.求代码及窗体设计
vb编程题:输入二次方程ax2+bx+c=0的三个系数,计算并输出二次方程的两个实根x1,x2,.
输入二次方程ax2+bx+c=0的三个系数,计算并输出二次方程的两个实数根x1,x2,界面自行设计.
编写程序,任意输入一元二次方程ax的平方+bx+c=0中的abc的值,计算并求输出方程的根
编写函数求一元二次方程ax2 +bx+c=0的解,分别通过文本框输入系数a,b,c,输出解x1,x2.
C语言 任意输入一元二次方程的系数a,b,c,计算并输出一元二次方程的所有根
设一元二次方程ax*X +bx+c=0(a不等于0)的两个根为x1,x2.则两个根与方程系数之间如下关系:
设X1,X2是一元二次方程ax*2+bx+c=0的两个根,试推导x1+x2=-b/a,x1x2=c/a
已知关于x的一元二次方程ax²+bx+c=0的两个根分别为x1,x2,
设一元二次方程ax^2+bx+c=0的两个根为X1,X2,那么X1-X2=(√b^2-4ac)/a