用vb来求解切比雪夫多项式在某一点的函数值

赤热的心发布于 2013-12-29 16:19， 524 次点击

Private Sub Command1_Click()
[b]Dim T() As Integer
Dim n%, x%
n = Val(InputBox("输入序列数"))
ReDim T(n)
T(0) = 1
T(1) = x
For n = 2 To n
T(n) = 2 * x * T(n - 1) + T(n - 2)
Next n
For n = 0 To n - 1
Print T(n),
If (n + 1) Mod 5 = 0 Then Print
Next

End Sub

4 回复

vbvcr512013-12-30 12:47

是分享吗

赤热的心2013-12-30 21:57

回复 2楼 vbvcr51

不是分享是交流，我做的这个有点问题。

Artless2013-12-31 11:48

以下是引用赤热的心在2013-12-30 21:57:54的发言：

不是分享是交流，我做的这个有点问题。

问题

vbvcr512013-12-31 12:37

关于用vb编程计算类似高等数学的求解，我建议用matlab软件，当然vb编程也可以实现的。
你的vb编程是什么问题啊？