VB编写程序,计算一元二次方程ax^2 bx c得实根,有以下几种肯能

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

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

PrivateSubCommand1_Click()Dima,xAsSinglea=Val(Text1.Text)Ifa再问：x=x+a*0.2+3000*0.2怎么都乘0.2呀？

希望有用,敬请采纳^_^#include#includeintmain(){voidroot2(doublea,doubleb,doubledisc);//定义方程有两个根时的函数voidroot1(

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

PrivateSubCommand1_Click()DimsAsString,nAsInteger,iAsIntegerFori=1To100n=n+iNextiPrint"1+2+3+……+100=

对于ax^2+bx+c=0intpanduan(inta,intb,intc){intm;m=b*b-4*a*c;return(m);}voidmain(){inta,b,c,flag,x1,x2,t

PublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesB

elseif连起来就行了PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,cAsSingle,dAsSinglea=Val(Text1.Text)b=V

usingSystem;usingSystem.Collections.Generic;usingSystem.Text;usingSystem.Collections;namespacecacFC{

新建工程,添加command1控件.vb6.0+xp调试成功代码如下：DimnAsIntegerPrivateSubCommand1_Click()m=InputBox("请输入底数m")n=Inpu

我也刚学C,费了好几个小时,终于把这个问题搞定了!已经运行过了,结果跟谭版结果一样,敬请放心使用.#include"stdio.h"#include"math.h"voidmain(){doublea

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

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

dimaaslongdimbaslongdimcaslongdimdassinglex1,x2也是dim(定义变量一般都是用dim)d=b^2-4acif再问：constaAslongbAslongc

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

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=","