vb怎么做判断b2-4ac大于0
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/18 08:03:14
B#1/11/2009#这个是日期月/日/年没问题了吧
Randomize'随机种子初始化DimInt_AAsIntegerInt_A=Int(Rnd()*10)'生成0-9之间的随机整数Int_A=Int(Rnd()*100)‘生成0-99之间的随机整数
ifx>aandx
也可以等于0比如x²-4x+4=0则b²-4ac=0b²-4ac可以是任意实数其中b²-4ac>0,有两个不同的跟b²-4ac=0,有两个相同的跟b&
x1=x2=-b/2a
http://zhidao.baidu.com/question/84671926.htmlhttp://blog.sina.com.cn/s/blog_5f9b43970100daad.htmlht
voidfangcheng(doublea,doubleb,doublec){doublex1,x2;doubledelta=b^2-4*a*c;if(delta>0){x1={-b+sqrt(b^2
在E2填入公式=if(B2/C2*41,B2/C2*4))
是二次函数y=ax^2+bx+c(a≠0)的顶点纵坐标公式,计算机里的正式写法是(4*ac-b^2)/4a
...书上不是很清楚的写了么x=(-b±√(b²-4ac))/2a
X1=-b+((b^2-4*a*c)/2*a)^(1/2)X2=-b-((b^2-4*a*c)/2*a)^(1/2)
dimnumnum=122.02ifnumint(num)thenmsgbox("非整数")
=if(a2>20,a2*2,if(a2=20,a2=b2,a2*3))
inputxifx=int(x)thenprintx;"isainteger."elseprintx;"isn'tainteger."或者inputxifx-int(x)>0thenprintx;"i
编辑一个有0~9、小数点、加减乘除的计算器用一个窗体就可以实现,你可以试试OptionExplicitDimstrNumberAsStringDimstrPointAsStringDimdblNum1
问你一下是判别式么?b平方4ac都是判别式里面的y=ax平方+bx+cb平方减四ac大于零两个解等于零一个解小于零无解如果还有问题我不知道你的8a怎么来的
第四√第五×
解题思路:根据预案的基本概念、公式解答解题过程:2、(1)×半径直径都是线段(2)√(3)√(4)×圆规两脚间的距离是半径的长度2.5厘米
PrivateSubCommand1_Click()IfIsNumeric(Text1.Text)Then'是否数字IfSgn(Val(Text1.Text))>0Then'是否正数IfCLng(Va
"a">"A"作为字符串比较,大写字母的ASCII在前,小写在后,所以小写大于大写.多个字母时,顺序比较,以第一个不相同的大小区分整个字符串的大小.