VB Y用for循环语句计算s=1*(1/2)÷(1/3)×(1/4)÷(1/5)×……÷(1/97)×(1/99)的值

VB Y用for循环语句计算s=1*(1/2)÷(1/3)×(1/4)÷(1/5)×……÷(1/97)×(1/99)的值,并输出结果
清淡无为 1年前 已收到1个回答 举报
赞

连梢 幼苗

共回答了23个问题采纳率：95.7% 举报

dim s as double
dim i as long
s=1.0
for i=1 to 99
if (i mod 2)=0 then
s=s/i
else
s=s*i
end if
next i
print s;

1年前

10
可能相似的问题

你能帮帮他们吗

精彩回答

Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.013 s. - webmaster@yulucn.com