菲波那契数列的第一项是0.第二项是1,以后各项都是前两项的和,编写程序求菲波那契数列第N项值

Question

菲波那契数列的第一项是0.第二项是1,以后各项都是前两项的和,编写程序求菲波那契数列第N项值

Answer 1

Private Sub Form_Click()
Dim n As Integer
x = 0
y = 1
For k = 1 To 5
s = x + y
x = y
y = s
Next k
Print y - x
End Sub