怎么樣輸入特定的三對角矩陣？并利用追趕發求解？
uj5u.com熱心網友回復：
供參考https://blog.csdn.net/u010450214/article/details/50170623
uj5u.com熱心網友回復：
百度搜相關關鍵字。uj5u.com熱心網友回復：
Sub TRIDAG(a, b, c, R(), X(), n)Nmax = 100
If a = 0# Then Exit Sub
X(1) = (R(1) - b * X(2)) / a
For j = 2 To n - 1
X(j) = (R(j) - c * X(j + 1) - b * X(j - 1)) / a
Next j
If j = n Then
X(j) = (R(j) - b * X(j - 1)) / a
End If
For j = n - 1 To 1 Step -1
X(j) = (R(j) - c * X(j + 1) - b * X(j - 1)) / a
Next j
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/46869.html
標籤：VB基礎類