Question

1+1/2-1/4+1/8-...+1/n用vfp程序怎么做

Answer 1

**求1+1/2-1/4+1/8-...+1/n
CLEAR
input "请输入n的值：" to n &&n为2的倍数
IF MOD(n,2)<>0.or.n<1.or.int(n)<>n
MESSAGEBOX("请输入正确的n的值",48,"提示")
RETURN
ENDIF
s=1
FOR i=1 TO Log(n)/LOG(2)
IF MOD(i,2)=0
s=s-1/2^i
ELSE
s=s+1/2^i
ENDIF
ENDFOR
?"1+1/2-1/4+1/8-...+1/n的和为：",s

Answer 2

input to n
j=1
s=1
i=2
do whil i<=n
s=s+j*(1/i)
j=-j
i=2*i
endf

追问

谢谢您的回答，但是做起来不太对，可否再次告诉我一遍 谢谢