用vb.net编程 sqrt(x+16)+Sqrt(X+9)=100 怎么解

这纯就是一个计算题：

创新互联于2013年创立，先为溆浦等服务建站，溆浦等地企业，进行企业商务咨询服务。为溆浦企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

'Sqrt (X + 16) + Sqrt(X + 9) = 100

'x+16+x+9+2*sqrt(x+16)*sqrt(x+9)=1000

'2*sqrt(x+16)*sqrt(x+9)=10000-2*x

'4*(x+16)*(x+9)=(10000-2*x)^2

'4(x^2+25*x+144)=4*x^2-40000*x+10000^2

'100X+576=-40000*x+10000^2

'40100x=10000^2+40000

'x=(10000^2+40000)/40100=2494.76309226933

VB.net的开方运算

VB的运算顺序是：先乘除、后加减，有括号的先算括号内，有负号的先算负号。

请你比较一下这个运算中x和y的值：

Dim n As Single = 4

Dim x As Single

Dim y As Single

x = n + 1

x = x / n

x = x - 1

x = Math.Sqrt(x)

y = Math.Sqrt((n + 1) / n - 1)

这样就会发现，你的代码中括号的位置错了。

正确的应该是： Math.Sqrt((n + 1) / n - 1)

VB.NET 求一元二次方程的程序

(-b+(b^2-4ac))/(2a) (-b+(b^2-4ac))/(2a) 是2个根

Delta = b * b - 4 * a * c '求得b*b-4*a*c并存放在变量Delta中

If Delta = 0 Then '如果Delta的值为0

Re = -b / (2 * a)

b * b - 4 * a * c＝b^2-4ac=0

-b/(2a)是唯一解

VB.NET为用户提供了Math.Sqrt函数用于计算平方根值，但被开方值若为负数则无法得出正确的结果（如，-4的平

问题不是很简单吗？

判断输入的数,大于等于零,则直接开方;小于零则取绝对值开方再加上字符"i",代码我就不写了.

vb中math.sqrt与sqrt的区别

vb6中没有sqrt，只有sqr

math.sqrt出现在了vb.net中，仅仅是将Sqr归类到math这个类下了，没有更多的区别

名称栏目：包含vb.net的sqrt的词条
文章来源：http://scgulin.cn/article/dodciod.html