您所在的当前位置: 计算机等级考试题库   >  
BASIC题库  
问题:

[填空题] 用以下公式求f(x)的值。当通项的绝对值小于10^-7时停止计算,x的值由键盘输入。f(x)=a1x1-a2x2+a3x3-…+(-1)n+1anxn+… |X|1其中 a1=1,a2=2,an= ,n=3,4,5…Option ExplicitPrivate Sub Commandl_Click()、Dim x As Single,fx As SingleDim a As Single,a1 As Single,a2 As SingleDim t As Singlea1=l:a2=2x=text1If () ThenMsgBox("x必须在-1---1之间")ExitSubEnd Iffx=a1*x-a2*x*xt=(-1)*x*xDOa=1/(al+a2)t=(-1)*x*xfx=()al=a2()Loop Until Abs(a*t)<0.0000001Text2=fxEnd Sub

可能感兴趣的题目: