vb求cos(x)
来源:学生作业帮助网 编辑:作业帮 时间:2024/10/03 06:05:08
'自己理解一下PrivateSubCommand1_Click()Dima,b,c,x,pipi=3.1415926a=3:b=4:x=90c=Sqr(a^2+b^2+2*a*b*Cos(90*pi/
∫cos(lnx)dx=∫xcos(lnx)d(lnx)=∫xd(sin(lnx))=xsin(lnx)-∫sin(lnx)dx=xsin(lnx)-∫xsin(lnx)d(lnx)=xsin(lnx
PrivateSubCommand1_Click()x=Text1.Texts=1a=1Dok=k+1a=a*-1*x^2/((2*k-1)*(2*k))s=s+aLoopUntilAbs(a)Tex
{cos^3(3x)}'=3cos^2(3X){cos(3x)}'=3cos^2(3X){-sin(3x)}(3x)'=3cos^2(3X){-sin(3x)}3=-9sin(3x)cos^2(3x)
函数值大于0,在X轴正半轴,相应的角在第一四象限,X=π/3,5π/3
(cos(a+b))^2
cos^2x=(1+cos2x)/2,所以∫cos^2xdx=∫(1+cos2x)/2dx=x/2+sin2x/4+C,C为积分常数.
PrivateSubCommand1_Click()DimpiAsDouble,xAsDoublepi=3.1415926x=2*Sin(45*pi/180)*Cos(45*pi/180)Printx
这个积分很少见啊,你在哪弄的啊,我做出来不是一个具体的函数,是一串表达式,大概是∫cos(x^2)dx=1/2*1/x*sinx^2-1/4*x^(-3)*cosx^2-3/8*x^(-5)*sinx
点小图看大图
sin(x)+cos(x)+|z|*(lg9+arctan(x))(e^X+e^Y)/(A+B) 再问:arctan?什么意思再答:反正切再答:比如tan(45°)=1,arctan(1)=
sin(x*x+2)/cos(57*pi/180)
用积化和差∫cos(3x)cos(2x)dx=(1/2)∫(cos5x+cosx)dx=(1/10)sin5x+(1/2)sinx+C若有不懂请追问,如果解决问题请点下面的“选为满意答案”.
cosacosb=(cos(a+b)+cos(a-b))/2=∫2dx/[cos(a-b)+cos(2x+a+b)]设t=tan[x+(a+b)/2]x=atant-(a+b)/2dx=1/1+t^2
Private Sub Command1_Click() Dim a(1 To 10) As D
sinx=2cosx,sin^2x=4cos^2xsin^2x=4-4sin^2x,sin^2x=4/5(cosx+sinx)/(cosx-sinx)+sin^2x=(1+tanx)/(1-tanx)
ConstPI=3.141592653'定义πDimaa=(Val(Text1.Text))*PI/180'将Text1.Text由角度转为弧度Label1.Caption=Math.Sin(a)'在