求VB编程代码(For循环).题目:求Fibonacci数列:1,1,2,3,5,8,…的前40个数
即:F1=1 (n=1), F2=l (n=2),Fn=F(n-l) F(n-2) (n>=3)谢谢
人气：144 ℃ 时间：2020-03-22 03:25:15
解答
Private Sub Form_Click()Dim a(1 To 40) As LongFor i = 1 To 40If i = 1 Or i = 2 Thena(i) = 1Elsea(i) = a(i - 2) + a(i - 1)End IfPrint a(i); Tab;If i Mod 5 = 0 Then PrintNext iEnd Sub
推荐
- 输出Fibonacci数列1,1,2,3,5,8等的前20项,按每行5个数显示.用vb谢谢
- 用VB编程,求Fibonacci数列的前40个数以及它们的和.
- vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是：第1个数和第二个数都是1
- 斐波那契数序列分别用递归法和递推法输出这个数列的前20项VB代码
- 过点P(-2,-3)作圆C:(x-4)^2+(y-2)^2=9的两条切线,切带内分别为A,B;
- 从:江水又东径狼尾滩而历人滩`````因名曰人滩也.这段话中:而,历,发皆具的具,相去二里的去,峻峭的意思.有整段意思更好.
- 一根铁丝，第一次用去全长的2/5，第二次又用去14米，剩下的与用去的长度比是1：3．这根铁丝原来多少米？
- He picked faster than any other students in his class同义句
猜你喜欢
