a(i) = a(i - 1) + a(i - 3) 怎么用VB 编程

[复制链接]
查看11 | 回复4 | 2013-1-5 13:30:43 | 显示全部楼层 |阅读模式
用递归就好了。Function a(i As Long) As Long
If i = 1 Then
a = 1
ElseIf i = 2 Then
a = 2
ElseIf i = 3 Then
a = 3
Else
a = a(i - 1) + a(i - 3)
End IfEnd Function...
回复

使用道具 举报

千问 | 2013-1-5 13:30:43 | 显示全部楼层
代码如下:for i=4 to n
a(i)=a(i-1)+a(i-3)next...
回复

使用道具 举报

千问 | 2013-1-5 13:30:43 | 显示全部楼层
Function calc1(i As Long) As Long
If i = 1 Then
return 1
ElseIf i = 2 Then
return 2
ElseIf i = 3 Then
return 3
Else
return c...
回复

使用道具 举报

千问 | 2013-1-5 13:30:43 | 显示全部楼层
for i=4 to n a(i)=a(i-1)+a(i-3)next i...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行