求2个VB代码 1 求斐波那契数列第29位数 2 s=1+2+3+…+n 当n为多少时 s>10000大神们帮帮忙

来源：学生作业帮编辑：神马作文网作业帮分类：综合作业时间：2024/11/12 02:45:53

第一题：Option Base 1 Private Sub Command1_Click() Dim a() As Long n = InputBox("请输入要求的第n个数") ReDim a(n) a(1) = 1 a(2) = 1 Select Case n Case 1 Print 1 Case 2 Print 1 Case Else For i = 3 To n a(i) = a(i - 1) + a(i - 2) Next i Print a(n) End Select End Sub 第二题：Private Sub Command1_Click() For i = 1 To 10000 s = s + i If s > 10000 Then Exit For End If Next i Print i End Su

求2个VB代码 1 求斐波那契数列第29位数 2 s=1+2+3+…+n 当n为多少时 s>10000大神们帮帮忙求vb编写程序大神求当s=1*2*3*4...*n小于或者等于5000时最大的n值及此时的s值. 棱长为a的小正方体,第1层1个,第2层3个,第3层6个,第4层10个,.,第n层S个,当n=10时,S为多少? 求vb题代码：求任意个数的阶乘累计和.s=1!+2!+3!+...+n!,n由用户输入. 数列a(n)=n (n+1)(n+2)(n+3), 求S(n)怎么用高中数列原理解答? 用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值 S=1-2+3-4+...+(-1)的n+1次方*n大神们帮帮忙数列Αn的前n项和为S,A1=1,S(n+1)=2S(n)+3n+1 证明(An+3)为等比数列 VB循环语句求s=1+3+5+……+2n-1的值高二的数列题求详解设数列{An}的前n项和为Sn 已知a1=1S(n+1)=4An+2 *注S(n+1）是第n+1项 vb计算1!+3!+*****+（2n+1）!的代码数列的通项a（n)的前几项和S（n)之间满足S（n）=2-3a（n）求 a(n)与a（n-1）、s(n)与s（n-1）的