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)的值,并输出结果
答案
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;
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点