|
问题：怎样用VFP在表单中做一个解一元二次方程的程序aX^2+bX+C=0
答案：↓↓↓ 赖胜的回答： 网友采纳 一元二次方程的程序aX^2+bX+C=0的求根公式：x=(-b±√b^2-4ac)/2a 解方程条件：b^2-4ac>=0 VFP简单程序,在命令按钮（command）属性“Click”事件中加入以下语句： input"请输入a："toa input"请输入b："tob input"请输入c："toc pd=b*b-4*a*c&&先计算b^2-4ac IFpd>=0&&判断方程是否有解（b^2-4ac>=0有解） x1=(-b+sqrt(pd))/2*a&&计算方程的第一个解"-b+√b^2-4ac)/2a" x2=(-b-sqrt(pd))/2*a&&计算方程的第二个解"-b-√b^2-4ac)/2a" "x1=：",x1&&显示方程的第一个解 "x2=：",x2&&显示方程的第二个解 ELSE messagebox("b^2-4ac | 
