编写程序，任意输入一元二次方程ax的平方+bx+c=0中的abc的值，计算并求输出方程的根

dim a as double,b as double,c as double
dim x1 as double,x2 as double
a=val(inputbox(""))
b=val(inputbox(""))
c=val(inputbox(""))
if sqrt(b^2-4ac)<0 then
print "无实根，请重新输入"
else
x1=(-b+sqrt(b^2-4ac))/(2a)
x2=(-b-sqrt(b^2-4ac))/(2a)
print x1,x2
end if

以上就是关于编写程序，任意输入一元二次方程ax的平方+bx+c=0中的abc的值，计算并求输出方程的根全部的内容，包括:编写程序，任意输入一元二次方程ax的平方+bx+c=0中的abc的值，计算并求输出方程的根、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！