用以下公式求 f(x) 的值。当通项的绝对值小于 10^-7 时停止计算, x ...001 Text2=fx End Sub
举一反三
- 用以下公式求f(x)的值。当通项的绝对值小于10^-7时停止计算,x的值由键盘输入。f(x)=a1x^1-a2x^2 a3x^3-... (-1) ^(n 1)anx^n ...,|X|
- 用以下公式求 f(x) 的值。当通项的绝对值小于 10^-7 时停止计算, x 的值由键盘输入。 f(x)=a 1 x^1-a 2 x^2+a 3 x^3-...+(-1) ^(n+1)*a n x^n+...,|X|<1 其中 a 1 =1 , a 2 =2 , a n =1/(a n-2 +a n-1 ) ,n=1,2,3,4,5,... Option Explicit Private Sub Commandl_Click() Dim x As Single , fx As Single Dim a As Single,a1 As Single,a2 As Single Dim t As Single a1=l : a2=2 x=text1 If ___________ Then MsgBox("x 必须在 -1---1 之间 ") ExitSub End If fx=a 1 *x-a 2 *x*x t=(-1)*x*x Do a=1/(a l +a 2 ) t=(-1)*x*x fx= __________ a l =a 2 Loop Until Abs(a*t)<0.0000001 Text2=fx End Sub
- 执行下列事件过程,y的值为。 Private Sub Command1_Click() x = 3 If x > 10 Then y = x ^ 2 + 3 * x + 2 Else If x > 5 Then y = 3 * x + 2 Else y = 5 End If End If End Sub
- .已知函数f(x)=cx+10小于x小于c;3x^4cx≥cx<1满足f(c^2)=9/8(1)求常数c的值(2)解不等式fx<2
- f(x)=2x^3-3(a+1)x^2+6ax+8若f(x)在x=3处取得极值,求常数的a值,求函数fx的单调区间.