VB中求sn=a aa aaa aaaa ... (最后一项为n个a)的值

由Sn^2=an(Sn-1/2)=[Sn-S(n-1)](Sn-1/2)=Sn^2-[1/2+S(n-1)]Sn+1/2*S(n-1)化简为[1/2+S(n-1)]Sn=1/2*S(n-1)两边同除S

解题思路：附件解题过程：附件最终答案：略

PrivateSubForm_Click()DimaAsIntegerDimnAsIntegerDimsAsStrings=""Randomizea=Int(Rnd()*9)+1n=Int(Rnd()

精度不够,我这个代码在VBA下可以得到0.5DimpiAsDoublepi=3.14159265358979MsgBoxSin(pi/6)实际上编程的时候,碰到有小数的场合,都应该考虑精度问题,一般不

Atn(X/Sqr(-X*X+1))这里的x是正弦值.

设等比数列{a[n]}的公比为q则S[n]=a[1](1-qⁿ)/(1-q)=2(1-qⁿ)/(1-q)则S[n]+1=2(1-qⁿ)/(1-q)+1S[1]+1=

条件不充分,根据这一条只能求出a9=20,（a1和d两个未知数）没法对任意的n求Sn...再问：求S17

Sn=[(a1+an)n]/2即118=n(25+an)而118=2×59n为正整数所以n=2或者n=591)n=2时数列只有两项a1=25a2=34Sn最大为S2=592)n=59时an=-23d=

因为：An+1=2Sn,则A(n-1)+1=2S(n-1)那么：2Sn-2S(n-1)=（An+1）-（A(n-1)+1）（n>=2）又因为：2Sn-2S(n-1)=2An（n>=2）所以：2An=（

当i不等于n的时候在s字符串最后加上一个“+”号,当输出最后一个字符串,比如22222时候i=5,n=5,这个时候不要再s最后加上“+”号如果有这句,比如a=2,n=5时候输出是这样的：当a=2时,n

意思是“路径”,也可能是一个普通的变量,没有具体的意思,具体要看用在什么地方

S(n)=S(n-1)/[2S(n-1)+1]1/S(n)=2+1/S(n-1)所以{1/S(n)}为等差数列,d=2所以1/S(n)=2n-1(n>=2),代入a1=S1=1,2n-1=1,所以n=

Sn-a1=48,Sn-an=36,Sn-a1-a2-an-1-an=21,∴2Sn-(a1+an)=84Sn-(a1+an)-(a2+an-1)=21∴2Sn-2Sn/n=84Sn-4Sn/n=21

在vb中真命题用0表示,假命题用1表示.判断句的优先级为从左到右,2=3是一个假命题则为0,因此该命题变为0

n>=2时：∵an=2Sn^2/[（2Sn）-1]∴Sn-(Sn-1)=2Sn^2/[（2Sn）-1]两边同时乘以（2Sn）-1并化简得2Sn(Sn-1)+Sn-(Sn-1)=0两边同时除以Sn(Sn

n≥2时,an=Sn-S(n-1)=2Sn²/(2Sn-1)[Sn-S(n-1)](2Sn-1)=2Sn²-Sn-2SnS(n-1)+S(n-1)=0S(n-1)-Sn=2SnS(

SUM是一个对像,VALUE是这个对像的一个属性!比如说,我在窗体上建一个进度条控件,那么SUM.VALUE=0就是说让这个进度条现在的状态显示为0

题目是不是错了?经化简可得2Sn/Sn-1=1-(Sn-1/Sn),发现Sn/Sn-1无解

Sn=Sn-1/(2Sn-1+1)S1=A1=1S2=1/(2*1+1)=1/3S3=1/3/(2*1/2+1)=1/5假设Sk=1/(2k-1)Sk+1=1/(2k-1)/(2*1/2k-1+1）=

已知Sn=2An-1取n=1得:S1=2A1-1又因为S1=A1,解上述方程可得:A1=1Sn=2An-1S(n-1)=2A(n-1)-1注:"n-1"为下标上下两式相减得:Sn-S(n-1)=2An