求用VB计算15阶楼梯只能走一阶或两阶有多少方法

来源:百度知道 编辑:UC知道 时间:2024/06/30 13:39:29
现有这样一个程序是对的,看不懂.还有没有其它办法,我刚学VB,抄答案
dim a ,b,c,d as integer
a=1'看不懂
b=2
c=0
for d = 3 to 15'看不懂
c=a+b'看不懂
a=b'还是看不懂
b=c
next
text1.text=c
end sub

设f[i]表示走到第i个楼梯的方法数,则
f[i]=f[i-1]+f[i-2],其中f[1]=1,f[2]=2(加法原理)
此时程序代码为:
For d=3 To 15
f(d)=f(d-1)+f(d-2)
Next d
Text1.text=f(15)
由于f[i]只与f[i-1]和f[i-2]线性相关,所以考虑使用循环数组,令:
a=f[i-2]、b=f[i-1]、c=f[i],那么代码变为
For d=3 To 15
c=a+b '等价于f(d)=f(d-1)+f(d-2)
a=b '使得f(d-2)等于f(d-1),为下一次循环准备
b=c '使得f(d-1)等于f(d),为下一次循环准备
Next d
Text1.text=c '此时c即为f(15)