*
一元二次方程
举报
发布于：2023-11-01
更新于：2023-11-01
0
296
作品介绍:
问题4.编写程序：输入一元二次方程的系数a,b,c的值， 求解一元二次方程的根。
操作说明:
Sub 一元二次方程() Dim a#, b#, c# a = Val(InputBox("参数a=")) b = Val(InputBox("参数b=")) c = Val(InputBox("参数c=")) Call root(a, b, c) End Sub