一元二次方程ax^2+bx+c=0的解x VB代码及添加的控件

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/27 15:07:14

一元二次方程ax^2+bx+c=0的解x VB代码及添加的控件

应该为if b²-4ac>=0 then
x1=负的2a分之b+根号下b²-4ac
x2=负的2a分之b-根号下b²-4ac
else
此二元一次方程无实数根
end if
如果要说明a不等于零就再在前面加个if

if b²-4ac>=0 then
x1=负的2a分之b+根号下b²-4ac
x2=负的2a分之b-根号下b²-4ac
else
此二元一次方程无实数根
end if
如果要说明a不等于零就再在前面加个if

一元二次方程的解是在b²-4ac≥0的前提下才有的。b²-4ac>0时,方程有两个不相等的实数根,X1=(-b+√b²-4ac)/2a ,X2=(-b-√b²-4ac)/2a ;b²-4ac=0时,x1=x2=-b/2a;b²-4ac<0时,方程无解。