Private Sub Command1_Click()
Dim a As Long, b As Long, c
Dim i As Integer, sum As Single
a = 2
b = 1
For i = 1 To 20
sum = sum + a / b
Print i; a; "/"; b
c = a
a = a + b
b = c
Next
Print
Print
Print sum
End Sub
有一分數(shù)序列2/1,3/2,5/3,8/5 .,求這個數(shù)列前20 項之和 計算機VB編程,
有一分數(shù)序列2/1,3/2,5/3,8/5 .,求這個數(shù)列前20 項之和 計算機VB編程,
其他人氣：682 ℃時間：2020-06-09 12:44:56
優(yōu)質(zhì)解答
我來回答
類似推薦
- 求VB編程代碼(For循環(huán)).題目:求Fibonacci數(shù)列:1,1,2,3,5,8,…的前40個數(shù)
- 有一分數(shù)序列2/1,3/2,5/3,8/5,.求出這個序列的前20的和 請發(fā)到shamanman19
- 糾正：C語言編程：有一分數(shù)序列：2/1,3/2,5/3,8/5,13/8,21/13...求出這個數(shù)列的前n項之和.
- vb編程 在窗體上打印數(shù)列2/1,3/2,5/3,8/5,13/8…的前10項,并求其和.
- 總分類賬戶和明細類賬戶平行登記的基本要點是
- 如何從粗硅到SiHCl3（粗）的化學(xué)方程式
- 純堿和小蘇打的用途有什么區(qū)別?
- 望梅止渴的意思.
- winter passing是什么意思
- 42除8的豎式計算
- “我是一個多才多藝的人.” 用英語怎么說?
- 古詩獨坐敬亭山,哪兩句體會詩人孤獨的心情
猜你喜歡
- 1給兩個原子的結(jié)構(gòu)示意圖,怎么表示兩種原子所形成的分子的化學(xué)式
- 2I won't tell you,that's a secret!
- 30.3MPa下空氣的密度是多少?求換算過程.
- 4201.304不銹鋼管的重量計算公式怎么算?
- 5Now let's talk about our food.
- 6一道科學(xué)物理題 公式 好的給分一根長25厘米,體積為5×10-6米3圓形均勻涂蠟的木棒
- 7小紅看一本科技書,看了3天,剩下121頁,如果用這樣的速度看4天就剩下全書的5分之2.這本書有多少頁.
- 8七年級下冊英語p35 3a翻譯
- 9客車和貨車同時從甲、乙兩地相對而行,6小時客車距乙地的距離是全程的12、5%,貨車超過中點54千米,已知貨
- 10求不等邊三角形的面積公式!
- 11亞硫酸鋇和硝酸反應(yīng)
- 12在RT三角形中,B為90度,AB為3cm,AC為5cm,要三角形ABC折疊,要C與A重合,得折痕DE,求三角形ABE面積