本程序的功能是,利用下列公式求函数cos(x)的近似值,规定通项的绝对值≤10^-6时结束计算。请完善本程序.cos(x)=1-通用公式可知:a =Option ExplicitPrivate Sub Command1_Ciick()Dim S As Single,T As Single,K As Integer,x As SingleConsteps As Single=0.000001x
主观题
本程序的功能是,利用下列公式求函数cos(x)的近似值,规定通项的绝对值≤10^-6时结束计算。请完善本程序.cos(x)=1-通用公式可知:a =Option ExplicitPrivate Sub Command1_Ciick()Dim S As Single,T As Single,K As Integer,x As SingleConsteps As Single=0.000001x