 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
小木蟲論壇-學術(shù)科研互動平臺 » 計算模擬區(qū) » 程序語言 » VB » 求lagrange插值編碼
| 5 | 1/1 | 返回列表 |
| 查看: 1269 | 回復(fù): 5 | ||
| 本帖產(chǎn)生 2 個 程序強帖 ，點擊這里進行查看 | ||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | ||
狼馨520金蟲 (小有名氣)
|
[求助]
求lagrange插值編碼
|
|
誰能指教一下lagrange插值的vb 編寫方法，我不會，急需�。�！ |
回復(fù)此樓» 猜你喜歡
290求調(diào)劑
已經(jīng)有7人回復(fù)
-
一志愿中南化學（0703）總分337求調(diào)劑
已經(jīng)有8人回復(fù)
-
北科281學碩材料求調(diào)劑
已經(jīng)有5人回復(fù)
-
求調(diào)劑一志愿南京航空航天大學289分
已經(jīng)有3人回復(fù)
-
A區(qū)線材料學調(diào)劑
已經(jīng)有5人回復(fù)
-
材料學碩297已過四六級求調(diào)劑推薦
已經(jīng)有11人回復(fù)
-
316求調(diào)劑
已經(jīng)有5人回復(fù)
-
一志愿西南交通 專碩 材料355 本科雙非 求調(diào)劑
已經(jīng)有5人回復(fù)
-
一志愿武漢理工材料工程專碩調(diào)劑
已經(jīng)有8人回復(fù)
-
329求調(diào)劑
已經(jīng)有8人回復(fù)
文俊點點
木蟲 (著名寫手)
- 應(yīng)助: 30 (小學生)
- 金幣: 2529.5
- 散金: 1796
- 紅花: 1
- 帖子: 1151
- 在線: 500.1小時
- 蟲號: 1219128
- 注冊: 2011-03-02
- 性別: GG
- 專業(yè): 文藝美學
3樓2011-07-02 18:10:09
libralibra
至尊木蟲 (著名寫手)
驃騎將軍
- 程序強帖: 40
- 應(yīng)助: 817 (博后)
- 金幣: 12914.1
- 紅花: 64
- 帖子: 2238
- 在線: 287.3小時
- 蟲號: 696514
- 注冊: 2009-02-05
- 專業(yè): 計算機軟件
2樓2011-07-02 02:41:02
狼馨520
金蟲 (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1217.7
- 散金: 145
- 帖子: 57
- 在線: 63.3小時
- 蟲號: 1238429
- 注冊: 2011-03-19
- 性別: GG
- 專業(yè): 能源化工
4樓2011-07-03 01:04:19
jjdg
版主 (知名作家)
- 程序強帖: 9
- 應(yīng)助: 223 (大學生)
- 貴賓: 3.926
- 金幣: 51005.2
- 紅花: 238
- 帖子: 7227
- 在線: 474.2小時
- 蟲號: 27000
- 注冊: 2003-10-21
- 專業(yè): 藥物代謝與藥物動力學
- 管轄: 程序語言
【答案】應(yīng)助回帖
★ ★ ★ ★ ★
dubo(金幣+5, 程序強帖+1): 感謝應(yīng)助 2011-07-31 13:47:46
dubo(金幣+5, 程序強帖+1): 感謝應(yīng)助 2011-07-31 13:47:46
|
N 整型變量，輸入?yún)?shù)，節(jié)點個數(shù) XA() 輸入?yún)?shù)，存放插值節(jié)點 YA() 輸入?yún)?shù)，存放函數(shù)值 X 輸入?yún)?shù)，插值自變量 Y 輸出參數(shù)，所求值 DY 輸出參數(shù)，誤差估計 Sub POLINT(XA(), YA(), N, X, Y, DY) Dim C(10), D(10) NS = 1 DIF = Abs(X - XA(1)) For I = 1 To N DIFT = Abs(X - XA(I)) If DIFT < DIF Then NS = I DIF = DIFT End If C(I) = YA(I) D(I) = YA(I) Next I Y = YA(NS) NS = NS - 1 For M = 1 To N - 1 For I = 1 To N - M HO = XA(I) - X HP = XA(I + M) - X W = C(I + 1) - D(I) DEN = HO - HP If DEN = 0# Then Print "PAUSE" Exit Sub End If DEN = W / DEN D(I) = HP * DEN C(I) = HO * DEN Next I If 2 * NS < N - M Then DY = C(NS + 1) Else DY = D(NS) NS = NS - 1 End If Y = Y + DY Next M End Sub |
5樓2011-07-03 13:43:47
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿中南化學（0703）總分337求調(diào)劑 +7 | niko- 2026-03-19 | 8/400 |
|
|---|---|---|---|---|
|
|
[考研] A區(qū)線材料學調(diào)劑 +5 | 周周無極 2026-03-20 | 5/250 |
|
|
[考研] 一志愿武漢理工材料工程專碩調(diào)劑 +8 | Doleres 2026-03-19 | 8/400 |
|
|
|
[考研] 一志愿華中農(nóng)業(yè)071010，總分320求調(diào)劑 +3 | 困困困困坤坤 2026-03-20 | 3/150 |
|
|
|
[考研] 材料學求調(diào)劑 +4 | Stella_Yao 2026-03-20 | 4/200 |
|
|
|
[考研] 319求調(diào)劑 +3 | 小力氣珂珂 2026-03-20 | 3/150 |
|
|
|
[考研] 086500 325 求調(diào)劑 +3 | 領(lǐng)帶小熊 2026-03-19 | 3/150 |
|
|
|
[考研] 材料學碩318求調(diào)劑 +5 | February_Feb 2026-03-19 | 5/250 |
|
|
|
[考研] 0703化學調(diào)劑 +4 | 18889395102 2026-03-18 | 4/200 |
|
|
|
[考研] 一志愿華中科技大學，080502，354分求調(diào)劑 +4 | 守候夕陽CF 2026-03-18 | 4/200 |
|
|
|
[考研] 311求調(diào)劑 +6 | 26研0 2026-03-15 | 6/300 |
|
|
|
[考研] 302求調(diào)劑 +10 | 呼呼呼。。。。 2026-03-17 | 10/500 |
|
|
|
[考研] 材料，紡織，生物（0856、0710），化學招生啦 +3 | Eember. 2026-03-17 | 9/450 |
|
|
|
[考研] 生物學071000 329分求調(diào)劑 +3 | 我愛生物生物愛?/a> 2026-03-17 | 3/150 |
|
|
|
[考研] 293求調(diào)劑 +11 | zjl的號 2026-03-16 | 16/800 |
|
|
|
[基金申請] 被我言中：新模板不強調(diào)格式了，假專家開始管格式了 +4 | beefly 2026-03-14 | 4/200 |
|
|
|
[考研] 一志愿南京大學，080500材料科學與工程，調(diào)劑 +4 | Jy? 2026-03-16 | 4/200 |
|
|
|
[考研] 考研調(diào)劑 +3 | 淇ya_~ 2026-03-17 | 5/250 |
|
|
|
[考研] 318求調(diào)劑 +3 | Yanyali 2026-03-15 | 3/150 |
|
|
|
[考研] 297一志愿上交085600求調(diào)劑 +5 | 指尖八千里 2026-03-14 | 5/250 |
|