x1 = (-b[ +|-] Sqr(b ^ 2 - 4 * a * c)) / 2 * a的vb代码是多少!

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/21 20:27:14

代码
Private Sub Command1_Click()
Dim a,b,c,x1,x2
a = InputBox("a",,2)
b = InputBox("b",,4)
c = InputBox("c",,1)
If b ^ 2 - 4 * a * c < 0 Then
MsgBox "无解"
Else
x1 = (-b + Sqr(b ^ 2 - 4 * a * c)) / (2 * a)
x2 = (-b - Sqr(b ^ 2 - 4 * a * c)) / (2 * a)
MsgBox "解得：" & x1 & "," & x2 & ""
Print x1,x2
End If
End Sub
当 b ^ 2 - 4 * a * c < 0 方程无解,还有
MsgBox "解得：" & x1 & "," & x2 & ""
Print x1,x2
这两句重复了,没必要
再问： MsgBox "解得：" & x1 & "，" & x2 & "" 这句是什么意思啊？？还有什么显示不出来啊？？

x1 = (-b[ +|-] Sqr(b ^ 2 - 4 * a * c)) / 2 * a的vb代码是多少! VB a=Sqr(3):b=Sqr(2):c=a>b:Print c 求详细解答过程 vb中有如下一段程序 a=sqr(3) b=sqr(2) c=a>b msgbox c+2 请问c=a>b是什么意思, a=sqr(3) b=sqr(2) c=a>b print c abc为正实数,求证sqr(a^2+b^2)+sqr(b^2+c^2)+sqr(c^2+a^2)>=sqr(2)(a+b 若a,b,c＞0且a（a+b+c）+bc=4-2sqr（3）求2a+b+c sqr表示2次开根请问在VB中算术表达式W=A^2/（B+C/（D+E/SQR(F)））改写为等价的数学表达式是什么? a = Sqr(3) b = Sqr(2) c = a > b MsgBox c + 2为什么结果是1 表达式X=Sqr(a^2-5)+Sqr(b^2-5)的类型是（） a*sqr(1-b^2)+b*sqr(1-a^2)=1 a^2+b^2=? 把VB算术表达式a / (b + c / (d + e / Sqr(f)))写成数学表达式. 一道VB填空题,设a=Sqr(2)*sqr(3)