VB的開2次方函數(shù)是SQR()。其他次開方可以使用指數(shù)函數(shù)Exp得到,如要計算x的開3次方:Exp(Log(x)/3)

創(chuàng)新互聯(lián)公司專業(yè)為企業(yè)提供深澤網(wǎng)站建設(shè)、深澤做網(wǎng)站、深澤網(wǎng)站設(shè)計、深澤網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計與制作、深澤企業(yè)網(wǎng)站模板建站服務(wù),10多年深澤做網(wǎng)站經(jīng)驗(yàn),不只是建網(wǎng)站,更提供有價值的思路和整體網(wǎng)絡(luò)服務(wù)。
Sqr 函數(shù)
返回一個 Double,指定參數(shù)的平方根。
語法
Sqr(number)
必要的 number 參數(shù) number 是 Double 或任何有效的大于或等于 0 的數(shù)值表達(dá)式。
例子:
Dim MySqr
MySqr = Sqr(4) ' 返回 2。
MySqr = Sqr(23) ' 返回 4.79583152331272。
MySqr = Sqr(0) ' 返回 0。
MySqr = Sqr(-4) ' 生成一個運(yùn)行時錯誤(負(fù)數(shù)不能用此函數(shù)開平方根)。
VB的運(yùn)算順序是:先乘除、后加減,有括號的先算括號內(nèi),有負(fù)號的先算負(fù)號。
請你比較一下這個運(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),你的代碼中括號的位置錯了。
正確的應(yīng)該是: Math.Sqrt((n + 1) / n - 1)
VB 有一個求平方根的函數(shù),使用示例:
a = Sqr(數(shù)值)
以下摘自 VB 6.0 SP6 的對象瀏覽器中對 Sqr 函數(shù)的解釋:
Function Sqr(Number As Double) As Double
VBA.Math 的成員
返回一個數(shù)的平方根
問題不是很簡單嗎?
判斷輸入的數(shù),大于等于零,則直接開方;小于零則取絕對值開方再加上字符"i",代碼我就不寫了.
要用程序來開平方,首先你最起碼要知道經(jīng)過自己推導(dǎo)出來的公司,其次再是求精度,你說的nLength是要得到的10進(jìn)制位數(shù),這個不能給你保證,你得用一個小數(shù)位數(shù)來表達(dá)精度。假如你開一個非常大的數(shù),你的整數(shù)部分就可能超過10位,更不要談精度
方法是這樣的:
x表示我要開的數(shù),y表示結(jié)果,z是和開方后比較接近的數(shù)
y=z+(x-x^2)/2*z
也許你還不太明白,具體舉例來說明
sqr(x)代表開x,即根號x,這個符號不太好打
假如我開5,即求根號5的值
5比4大sqr(4)=2,sqr(9)=3,9比5大,即459,所以2sqr(5)3,我們?nèi)稳∵@個范圍的一個數(shù),就取2.5,z=2.5
y=2.5+(5-2.5^2)/2.5*2=2.25
此時比較接近結(jié)果的值是2.25,即z=2.25
y=2.25+(5-2.25^2)/2.25*2=2.2361112
比較接近了,想要再精確,就再次循環(huán)
通過上面的舉例,相信你已經(jīng)發(fā)現(xiàn)了用循環(huán)來求精度
具體該怎么做,相信你已經(jīng)知道了
新聞名稱:vb.net中開方的函數(shù),c語言中表示開方的函數(shù)
分享URL:http://chinadenli.net/article46/dsgcjeg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站排名、Google、用戶體驗(yàn)、品牌網(wǎng)站設(shè)計、ChatGPT、微信公眾號
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)