December 8, 2016学习记录(一)这里是我在学习《数值分析》的过程中编写计算程序的一点记录。 插值问题 逼近问题 插值问题 Lagrange interpolation使用Visual Basic在Excel中编写,计算示例如下 以下为部分源码 123456789101112131415For i = 1 To n For j = 1 To n If i <> j Then w(i) = w(i) * (x(i) - x(j)) Else w(i) = w(i) End If Next w1 = w1 * (xx - x(i))NextFor j = 1 To n l(j) = w1 / (xx - x(j)) / w(j) f = f + l(j) * y(j)Next fx = f