clear
set talk off
s=0
for i=1to 100
s=s+((-1)^(i+1)/i)
endfor
?s
set talk on
return
j=-1
s=0
for i=1 to 100
j=j*j
s=s+j*(1/i)
endfor
return
n=1
for n=1 to 100
s=s+（-1/n）^(n+1)
endfor
?s
return
clear
s=1
input "Input a int num:" to n
for i=1 to n-1
if i%2=0
s=s+1/2^i
else
s=s-1/2^i
endif
endfor
?s
set talk on
return
VF编程 S=1-1\/2+1\/3-1\/4+...-1\/10
nadd=0 for i=1 to 10 nadd=nadd+(-1)^(i-1)*(1\/i)endfor ?"1－1／2＋1／3－1／4＋．．．－1／10=",nadd
用VF编写程序1-1\/2+1\/3-1\/4+1\/5-……-1\/100的和。。。
?"1-1\/2+1\/3-1\/4+1\/5-……-1\/100=",s
用vf编程!求级数s=1+1\/2-1\/3+1\/4~~~
clear s=1 input "请输入n的值：" to n for i=2 to n k=(-1)^i m=k\/i s=s+m endfor ?"s=1+1\/2-1\/3+1\/4+...+1\/n",s
vf计算1+1\/2+1\/3+……1\/100
set talk off clear s=0 for i=1 to 100 s=s+1\/i endf ? s set talk on return 结果为：5.1874
vf编写程序,利用下列公式计算π的值π\/4=1-1\/3+1\/5-1\/7…+1\/(4n-3...
clear n=1000 b=n*4-1 tt=0 for a=1 to n*4-3 step 2 s=1\/a tt=tt+s endfor ?tt-1\/b return 答案是：4.7817 楼主觉得可以那就 小第分少 请多给个分哈！
用vf编写s=1!+2!+3!+...+100!的程序
i=1 nadd=0 cadd=1 do while i<=100 cadd=1 for j=1 to i cadd=cadd*j endfor nadd=nadd+cadd i=i+1 IF i=100 EXIT ENDIF enddo ?"1!+2！+3!+...+100!=",nadd
在vf中编程s=1+1\/2+2\/3+3\/5+4\/8+5\/12+6\/17+7\/23+8\/30+9\/38怎么算
s=1n=1for i = 1 to 9s = s + i\/(n+1)n=n+iendfor 家里没按vf 用vb给你截个图(为了方便显示效果 我改了下代码 vf的话你直接用上面的就行了)
vf中1+1\/2+1\/3...+1\/n求和的程序怎么写??
新建一个程序（文件菜单——新建——程序——新建文件），写代码：input "请输入n的值:"to n s=0 for i=1 to n s=s+1\/i next ?"1+1\/2+1\/3...+1\/n=",s 然后，直接点击感叹号，保存并运行，图：
VF编程求1——100的素数!!!急!!!
clear s=0 for i=1 to 100 step 2 flag=0 for j=2 to int(sqrt(i))if mod(i,j)=0 flag=1 exit endif endfor if flag=0 ?i endif endfor return
编程计算 S=1+2+3+4...+99+100的值
VF的程序命令：clear s=0 for i=1 to 100 s=s+i endfor ?,'s=,s
