下列程序的功能是求算式:1-1/2+1/3-1/4+….前30项之和。请在空白处填入适当的语句,使程序可以完成指定的功能。PrivateSubCommand1()Click()DimiasInteger,sAsSingle,fAsIntegers=0:f=1Fori=1To30s=s+f/if=()NextiDebug.Print“1-1/2+1/3-1/4+…=”;sEndSub

浏览:323

下列程序的功能是求算式:1-1/2+1/3-1/4+….前30项之和。请在空白处填入适当的语句,使程序可以完成指定的功能。PrivateSubCommand1()Click()DimiasInteger,sAsSingle,fAsIntegers=0:f=1Fori=1To30s=s+f/if=()NextiDebug.Print“1-1/2+1/3-1/4+…=”;sEndSub 正确答案:(以下答案任选其一都对)-f;-1f;(-1)^(i-1);-1/f;(-1)f;(-1)/f