求用VB写出:S=1+3+5+7+.+999的值(要详细过程)

lingjiugong 1年前 已收到1个回答 举报

那一年的猫和狗 春芽

共回答了22个问题采纳率:90.9% 举报

Dim s As Integer,i As Integer
s=0
i=1
Do
s=s+i
i=i+2
Loop Until i>999
Print "S=1+3+5+7+...+999=";s

1年前

10
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.030 s. - webmaster@yulucn.com