斐波那契数序列分别用递归法和递推法输出这个数列的前20项VB代码
分别用递归法和递推法输出这个数列的前20项VB代码
第二十项为6765
输出前二十项,就是显示全部二十项,并且分别用递归法和递推法排列前二十项!
人气:468 ℃ 时间:2020-04-14 03:02:51
解答
Private Function F(n As Long) As LongIf n > 2 Then F = F(n - 1) + F(n - 2) Else F = 1 End If End Function Private Sub Command1_Click() ClsDim I as longFor i=1 to 20Print "第" & I & "项:" & F(i) NextEn...
推荐
- vb用递归法求Fibonacci数列的第20、200项
- 求VB编程代码(For循环).题目:求Fibonacci数列:1,1,2,3,5,8,…的前40个数
- vb 利用递归求数列前10项之和(该数列的分子和分母均为斐波那契序列)
- vb求斐波那契(Fibonaccii)数列前20项的和
- 用VB编程,求Fibonacci数列的前40个数以及它们的和.
- 两个长方形,它们的周长相等,甲的长与宽之比是3:2,乙的长与宽之比是7:5,则甲与乙面积之比是( ) A.3:2 B.7:5 C.864:875
- 神经纤维冲动传导的最高频率小于绝对不应期的倒数
- 用卡诺图化简逻辑函数式Z(A,B,C,D)=CD~(A异或B)+A~BC~+A~约束条件为 B+CD=0
猜你喜欢