编写一元二次方程求根的vb程序

请楼主参考下面的代码.>>f=inline('exp(-x)-sin(pi*x/2)');%随便给个函数.自己输入吧.a=0;b=1;%输入区间.也是按照题目要求输入.err=(b-a)/2;k=0;

PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,cAsSingleDimdAsSingle,x1AsSingle,x2AsSinglea=InputB

double x1 = 0;//解1double x2 = 0;//解2Console.WriteLine("求 ax^

ax^2+bx+c=0(b^2-4ac≥0）x=(-b+-根号下b^2-4ac)/2a推导过程运用配方法第一步,二次项系数化为1（两边都除以a)第二步配方,两边都加上,一次项系数一半的平方,（b/2a

//Equation.h#ifndef_Equation_h#define_Equation_hclassEquation{private:doublea;doubleb;doublec;voidSh

负B加减根号B的平方（简略点读B方）减四AC除以二A.或者读成分数形式：二A分之负B加减根号B的平方（简略点读B方）减四AC.我都是把读音逐字逐句地打出的啊.还有其他回答里说的delta指的是这个符号

若二次项系数为a,一次项系数为b,常数项为c,根为x,则x=[-b±根号(b^2-4ac)]/2a

兄弟,西理工的?

PublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesB

ax^2+bx+c=0(b^2-4ac≥0）x=(-b+-根号下b^2-4ac)/2a推导过程运用配方法第一步,二次项系数化为1（两边都除以a)第二步配方,两边都加上,一次项系数一半的平方,（b/2a

MsgBox"请输入完整的数值,然后点击“开始计算”!"Text1.SetFocusText1.Text=""Text2.Text=""'清空用户名和密码等待重新输入Text3.Text=""Text

将六个圆命名为“Oval1”直到“Oval6”在窗体上放6个timer控件.写入如下代码：Private Sub Form_load()'必要的初始化操作Timer1.in

拜托,这么多输入你就用列表啦,用那么多textbox,你不累我看得都累.还有,你要求的是什么尽量用数学的方式表达出来,有图更好至于你的a5d6的问题,是因为你的是字符串运算而不是数值运算,转换一下类型

第二题：#includevoidmain(){inti,g,s,b;for(i=100;i

C++的代码：#include#includevoidmain(void){doublea,b,c,d;charch('y');do{coutb>>c;if(-0.0001

x=[-b±√(b^2-4ac)]/2a

type根类型有根asboolean大根assingle小根assingleendtypefunction求根(aassingle,bassingle,cassingle)as根类型dim得塔assi

两处错误,第一个,没有赋值过程,应该改为：a=InputBox("a=")b=InputBox("b=")c=InputBox("c=")第二个：x1=(-b-d)/(2*a)应该是x2=(-b-d)

以下是画一元二次方程的图的代码：（假设y=a*x^2+b*x+c,将窗口的大小调为4800×4800）PrivateSubCommand1_Click()ClsLine(0,2400)-(4800,2

PrivateSubCommand1_Click()Dima#,b#,c#,d#,x1#,x2#a=Val(InputBox("a=","数据输入框",1))b=Val(InputBox("b=","