求vf高手,求一元二次方程的代码,制作表单里要用。速度!
发布网友
发布时间：2024-10-01 04:33
共1个回答
热心网友
时间：2024-11-18 07:18
text
一元二次方程求解
ax^2+bx+c=0
endtext
input "请输入a的值：" to a
input "请输入b的值：" to b
input "请输入c的值：" to c
m=b*b-4*a*c
if m>=0
x1=(-b+sqrt(m))/(2*a)
x2=(-b-sqrt(m))/(2*a)
?"x1的值是：",x1
?"x2的值是：",x2
else
?"此方程无实根!"
endif
