vb输出一元二次方程的虚根

有虚根,首先判别式=4a^2-7

ax^2+bx+c=0Δ=b^2-4ac当Δ

x=a±根(3a)i,所以a^2+9a^2=4a^2=2/5因为（2a）^2-4(a^2-3a)

对于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

求根公式知两虚数共轭,设为m+ni和m-ni有：z1^2/z2=…化简后其虚部为正负3a^2b-b^3(之所以正负之分,在于谁为除数,谁为被除数),为实数,虚部为0,则有正负根号3a=b,楼上猜得不错

PublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesB

实系数一元二次方程的两个虚根是共轭虚数所以另一根是1+2i有韦达定理(1-2i)*(1+2i)=5=c,(1-2i)+(1+2i)=2=-b所以c=5,b=-2

解1由题知z1,z2为共轭复数又由z1+z2=2解得z1,z2的实部为1又由丨z1丨=根号2,知z1的虚部为±1故z1=1+i,z2=1-i或z1=1-i,z2=1+i2由z1+z1=2z1z2=2构

PrivateSubCommand1_Click()a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)Ifb^2-4*a*cText4.Text="

只有在-b+-根号b^2-4ac/2a>0时才有两根,刚好满足共轭条件,这是定理.

自己看下书,试着写一下就好,太简单了再问：你妹，会了还问你？别把自己膨胀的信心践踏在别人身上再答：别误会，要是说过了我很抱歉，这个代码估计没人给你发，还是自己照着书写就可以实现，很快的再问：好吧，原谅

一元二次方程在根的判别式Δ

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

vb代码如下：PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,cAsSingleDimdAsSingle,x1AsSingle,x2AsSinglea

给个算法的框架,你可以自己细化.#include"math.h"floata,b,c,delta;scanf("%f,%f,%f",&a,&b,&c);delta=b*b-4*a*c;if(delta

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

给你举个例子吧,-1的平方根为±i,也就是说根号内的数是负数时,把负数的“-”号提出来,用根号里的数的绝对值进行求解,然后在求出的每一个根的后面加上i就可以了,就是方程的虚根,具体来说其实i就是一个虚

对于实系数一元二次方程,1.如果判别式大于零,则方程有两个相异的实根.2.如果判别式等于零,则方程有两个相等的实根.3.如果判别式小于零,则有两个复数根（虚根）.如果二次方程有复数根,则一定有两个复数

再答：�ٰ�ab����Ϳ�����再问：���һ��û����Ϊʲôû����Τ�ﶨ��再答：���һ������ʵ��=ʵ�����鲿=�鲿�ó����ķ���再问：Ŷ���ð���������Ҳ

dima,b,c,x1,x2,da=val(inputbox("请输入系数a"))b=val(inputbox("请输入系数b"))c=val(inputbox("请输入系数c"))d=b^2-4*a