输入3到100之间的所有奇数，并求这些所有基数之和，用VB写出程序
答案:2 悬赏:50
解决时间 2021-02-23 10:40
- 提问者网友：斩断情丝
- 2021-02-22 14:13
输入3到100之间的所有奇数，并求这些所有基数之和，用VB写出程序
最佳答案
- 二级知识专家网友：一场云烟
- 2021-02-22 14:30
Dim a As Integer
Dim s As Integer
s = 0
For a = 3 To 100
If a Mod 2 <> 0 Then
s = s + a
Print a
End If
Next a
Print s
Dim s As Integer
s = 0
For a = 3 To 100
If a Mod 2 <> 0 Then
s = s + a
Print a
End If
Next a
Print s
全部回答
- 1楼网友：承载所有颓废
- 2021-02-22 14:41
dim s
for i=3 to 100
if i mod 2=1 then
print i
s=s+i
end if
next i
再看看别人怎么说的。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯