斐波那契(Fibonacci)数列的构成规律是:数列的第1 2个数是1 从第3个数起 每个数是其前面
斐波那契(Fibonacci)数列的构成规律是:数列的第1、2个数是1,从第3个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前12项值的过程,请完善程序。 Sub Fibonacci(N As Integer,s1) s1=0 f1=1 【 】 For i=1 To N/2 Print f1;f2; s1=f1+f2 f1=f1+f2 f2=【 】 Next i Print End Sub Private Sub Command1_Click() Dim sum As Integer Call Fibonacci(12,sum) Print "Sum=";sum End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:f2=1f1+f2
根据“数列的第1、2个数是1”的题意,填空【】应是f2=1根据“从第3个数起,每个数是其前面两个数之和”的题意,填空【】应是f1+f2。
相似问题
一个模块被多个模块调用 调用这个模块的模块个数称为【 】。请帮忙给出正确答案和分析 谢谢!
一个模块被多个模块调用,调用这个模块的模块个数称为【 】。请帮忙给出正确答案和分析,谢谢!
有下列程序: Private Sub Command1_Click() Dim i As Integ
有下列程序: Private Sub Command1_Click() Dim i As Integer Dim arrY(5)As Integer For i = 0 To 4 arrY (i) = 5 Next i Dim
在一个链队中 如果front和rear是队首和队尾的指针 则插入一个结点s↑的操作是【 】。请帮忙给
在一个链队中,如果front和rear是队首和队尾的指针,则插入一个结点s↑的操作是【 】。请帮忙给出正确答案和分析,谢谢!
在Visual Basic 程序启动运行中设置一个封面窗口 显示一些有意义的信息 要求显示时间5秒。
在Visual Basic 程序启动运行中设置一个封面窗口,显示一些有意义的信息,要求显示时间5秒。 Sub dlys(ByVal n As Single) Dim tl As Single
下列程序的功能是将数组中的奇数相加。给定的程序不完整 请将程序补充完整。 Option Base 1
下列程序的功能是将数组中的奇数相加。给定的程序不完整,请将程序补充完整。 Option Base 1 Private Sub form_Click() Dim k As Integer Dim
