输出Fibonacci数列1,1,2,3,5,8等的前20项,按每行5个数显示.用vb谢谢
人气:241 ℃ 时间:2020-03-23 08:16:06
解答
Private Sub Command1_Click()Dim a(1 To 20) As IntegerFor i = 1 To 20If i = 1 Or i = 2 Thena(i) = 1Elsea(i) = a(i - 1) + a(i - 2)End IfPrint a(i);n = n + 1If...刚刚的那个题的答案是多少???不是写了吗?答案是9433
推荐
- 第六题:输出fibonacci数列的前20项的值,每行输出一个数.
- 求VB编程代码(For循环).题目:求Fibonacci数列:1,1,2,3,5,8,…的前40个数
- 用VB编程,求Fibonacci数列的前40个数以及它们的和.
- 斐波那契数序列分别用递归法和递推法输出这个数列的前20项VB代码
- 用数组来求Fibonacci数列前20个数,以每行5个数进行输出.
- 甲乙两个车站间路程为390千米,大货车从甲站开出,每小时行驶52千米.小轿车从乙站开出,每小时行驶78千米
- 若点 M(3,m)与点 N(n,m-1)关于原点对称,则 m= n=
- 已知向量p=(向量a)/|(向量a)|+(向量b)/|(向量b)|其中(向量a)、(向量b)均为非零向量,则|(向量p)|的取值范围是多少?
猜你喜欢