写出求S=1-1/2+1/3+1/4+……+1/99-1/00的程序.注：用基本算法语句,

框图免了，注意程序中的P值的变化，初值=+1 ，执行P=-P后，P就为-1 ,下次又变为+1,这里n值我们由input输入，
程序如下:记得加分哟！
INPUT "n="; n
s = 0 '和的初值
i = 1 '计数
p = 1
WHILE i s = s + p / i
i = i + 1 '计数+1
p = - p '每执行一次，P的值就在 1 或-1间变换
WEND
PRINT "s="; s
程序在QBASIC上执行通过

关键部分：
sum=0,t=1
for(i=1;i{
sum=sum+t/i
t=-t
}
print:sum

i=1
s=0
while i