Rem 語言：Visual Basic 6.0
Sub Main() '開始
S = 1 :i = 2
Do
S = S + (i - 1) / i
If Not (i < 100) Then Exit Do
i = i + 1
Loop
MsgBox S,vbInformation,"輸出"
End Sub '結束
設計一個計算1+1／2+2/3+3/4+……+99/100的算法,并畫出程序框圖 急
設計一個計算1+1／2+2/3+3/4+……+99/100的算法,并畫出程序框圖 急
設計一個計算1+1／2+2/3+3/4+……+99/100的算法,并畫出程序框圖
設計一個計算1+1／2+2/3+3/4+……+99/100的算法,并畫出程序框圖
數(shù)學人氣：262 ℃時間：2019-12-17 07:20:10
優(yōu)質(zhì)解答
Rem 語言：Visual Basic 6.0
Sub Main() '開始
S = 1 :i = 2
Do
S = S + (i - 1) / i
If Not (i < 100) Then Exit Do
i = i + 1
Loop
MsgBox S,vbInformation,"輸出"
End Sub '結束
我來回答
類似推薦
- 畫出一個計算1×3×5×…×99的程序框圖，并編寫出程序．
- 設計一個求S=12+22+…+992+1002的值程序框圖并用For語句寫出程序．
- 設計一個算法求1平方+2平方+……+99平方+100平方的值,并畫出程序框圖
- 設計算法求1/1×2+1/2×3+1/3×4+…+1/99×100的值，要求寫出算法步驟并畫出程序框圖．
- 設計一個算法求1*1+2*2+……+99*99+100*100的值,并畫出程序框圖.
- 美利堅合眾國各州The States of the United States of America
- what do you like to do英語作文,越多越好
- 意思是形容失意時情緒低落,提不起精神的樣子的四字詞語
- A,B,C為中學化學常見化合物,甲,乙,丙為單質(zhì)
- 一件成品為200元的商品標出的價格為400元,現(xiàn)打7.5折出售此商品,則可獲得利潤 元,其利潤為
- 正方形的邊長為4厘米,剪去四個角后成為一個正八邊形.求這個正八邊形的邊長和面積
- 先判斷x與y成什么比例,再填表
猜你喜歡
- 1island怎么讀
- 2whereis she?怎么轉換為do you know where she is
- 3求軍訓1000字的心得體會!
- 4帶橋字的成語 越多越好
- 5and only want to sleep with you and have babies with you..maybe i am nota good englsh teacher
- 6請問,正電荷可不可以移動?還有,神經(jīng)纖維和神經(jīng)元有關系嗎?
- 7The studengts have a long holiday in some parts of the US.The school year begins in late August or early Septembeer,and
- 8西電東送工程中,中線和南線的電力主要來自于對河流中上游的梯級開發(fā),流域梯級開發(fā)除發(fā)電外,對區(qū)域經(jīng)濟發(fā)展帶來的有利影響有什么（4個）
- 9,甲乙兩筐蘋果共112個,如果從甲筐中拿出蘋果給乙筐,再從乙框中拿出五分之一放入甲筐,結果兩筐蘋果就一樣
- 10英語翻譯
- 11that was a statement
- 12生物圈和生態(tài)系統(tǒng)的概念