用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2

用vb做:输入一元二次方程ax^2+bx+c=0的系数abc,计算并输出一元二次方程的两个根x1,x2
数学人气:450 ℃时间:2019-08-19 07:08:55
优质解答
dim a ,b,c,x1,x2,d a =val(inputbox("请输入系数a")) b =val(inputbox("请输入系数b")) c =val(inputbox("请输入系数c")) d=b^2-4*a*cif d>0 then x1=(-b+sqr(d))/2x2=(-b-sqr(d))/2elseif d=0 thenx1=-b/2x2=x1els...
我来回答
类似推荐
请使用1024x768 IE6.0或更高版本浏览器浏览本站点,以保证最佳阅读效果。本页提供作业小助手,一起搜作业以及作业好帮手最新版!
版权所有 CopyRight © 2012-2024 作业小助手 All Rights Reserved. 手机版