編寫VB程序，輸出
1
2
+
2
3
+
4
3
+
…
+
100
101
的和
Dim s as double
S=0
For i=1 to 100
S=S+i/（i+1）
Next i
Print s
Dim s as double
S=0
For i=1 to 100
S=S+i/（i+1）
Next i
Print s
。

【考點】表達式．

【答案】Dim s as double
S=0
For i=1 to 100
S=S+i/（i+1）
Next i
Print s

【解答】

【點評】

聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。

發(fā)布：2024/4/20 14:35:0組卷：0引用：1難度：0.2

相似題

1．下列可以實現(xiàn)將實數(shù) x 四舍五入保留 2 位小數(shù)的 VB 表達式是（　?。?/h2>
A．Int（x*100）/100 B．Int（x*100）/100+0.5
C．Int（x*100+0.5）/100 D．Int（x*100+0.5）
發(fā)布：2025/1/2 11:0:1組卷：0引用：1難度：0.5
解析
2．已知a,b均為正整數(shù)，下列表達式中，與表達式a Mod b等價的是（　?。?/h2>
A．（a*b）Mod b B．（a+b）Mod b
C．（a-b） Mod b D．（a+1）Mod b-1
發(fā)布：2025/1/2 12:0:1組卷：0引用：1難度：0.5
解析
3．下列VB表達式中，能隨機產(chǎn)生10至100之間的奇數(shù)的是（　　）
A．Int（Rnd*90）+10 B．Int（Rnd*90）+11
C．Int（Rnd*45）*2+10 D．Int（Rnd*45）*2+11
發(fā)布：2025/1/2 11:0:1組卷：0引用：1難度：0.4
解析

把好題分享給你的好友吧~~

A．Int（x*100）/100	B．Int（x*100）/100+0.5
C．Int（x*100+0.5）/100	D．Int（x*100+0.5）

A．（a*b）Mod b	B．（a+b）Mod b
C．（a-b） Mod b	D．（a+1）Mod b-1

A．Int（Rnd*90）+10	B．Int（Rnd*90）+11
C．Int（Rnd45）2+10	D．Int（Rnd45）2+11

編寫VB程序，輸出12+23+43+…+100101的和 Dim s as doubleS=0For i=1 to 100S=S+i/（i+1）Next iPrint sDim s as doubleS=0For i=1 to 100S=S+i/（i+1）Next iPrint s。