求VB编程代码(For循环).题目:求Fibonacci数列:1,1,2,3,5,8,…的前40个数
求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)谢谢
即:F1=1 (n=1), F2=l (n=2),Fn=F(n-l) F(n-2) (n>=3)谢谢
其他人气:330 ℃时间: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
我来回答
类似推荐
猜你喜欢
- 1钡餐的主要成分
- 2设f(x)=(sinx^2+1),求f(x)在x=0点的带PEANO余项的泰勒公式,并求f(n)(0)
- 3W、X、Y、Z是原子序数依次增大的同一短周期元素,W、X是金属元素,Y、Z是非金属元素. (1)W、X各自的最高价氧化物对应的水化物可以反应生成盐和水,该反应的离子方程式为_. (2)W与
- 4粮店运来420千克面粉,运来的面粉也大米少1/7,运来的面粉比大米少多少千克?
- 5有一质量为5.4kg的铝球,体积是3000cm3,试判断这个球是实心还是空心的?若是空心的,求出空心部分的体积.(铝的密度为2.7×103kg/m3,取g=10N/kg)
- 6在三角形abc中,a坐标(4,-1),它的两条角平分线方程为L1:X-Y-1=0和L2:X+Y+2=0,求BC所在直线方程?
- 7大正方形的边长是1分米,小正方形的边长是6厘米,小正方形面积是大正方形的几分之几?(最简分数)
- 8Does John have a ___?Yes,he ___ at a school.A.job;works B.work;works C.job;work D.job;jobs
- 9一个长方形,如果宽增加2厘米,面积就增加16平方厘米,这时的图形恰好是一个正方形.原来长方形的面积是多少?
- 10一个圆锥体积是15.7立方米,底面积3.14平方米,这个圆锥有多高?