問題不是很簡單嗎?
創(chuàng)新互聯(lián)建站專注于企業(yè)全網(wǎng)營銷推廣、網(wǎng)站重做改版、珠海網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、H5響應(yīng)式網(wǎng)站、商城系統(tǒng)網(wǎng)站開發(fā)、集團(tuán)公司官網(wǎng)建設(shè)、成都外貿(mào)網(wǎng)站制作、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁設(shè)計(jì)等建站業(yè)務(wù),價(jià)格優(yōu)惠性價(jià)比高,為珠海等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。
判斷輸入的數(shù),大于等于零,則直接開方;小于零則取絕對值開方再加上字符"i",代碼我就不寫了.
Sqr 函數(shù) 返回一個(gè) Double,指定參數(shù)的平方根。 語法 Sqr(number) 必要的 number 參數(shù) number 是 Double 或任何有效的大于或等于 0 的數(shù)值表達(dá)式。 例子: Dim MySqr MySqr = Sqr(4) ' 返回 2。 MySqr = Sqr(23) ' 返回 4.79583152331272。 MySqr
vb6中沒有sqrt,只有sqr
math.sqrt出現(xiàn)在了vb.net中,僅僅是將Sqr歸類到math這個(gè)類下了,沒有更多的區(qū)別
VB的運(yùn)算順序是:先乘除、后加減,有括號的先算括號內(nèi),有負(fù)號的先算負(fù)號。
請你比較一下這個(gè)運(yùn)算中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)
這樣就會發(fā)現(xiàn),你的代碼中括號的位置錯(cuò)了。
正確的應(yīng)該是: Math.Sqrt((n + 1) / n - 1)