VBscript 中库函数的使用练习

函数中总共使用了 log 是以e 为底的对数，lg 是利用 log(num) / log(10)  来进行计算的，Cos，Tan 是来进行求弧度的，PI 是用const常量来定义

第一题求解

Dim a,b,c,x,e,ans
a=1 : b=1 : c=1 : x=2 : e=1
ans=x*(x*(x*(a*x+b)+c)+c)+e
WScript.Echo ans

第二题求解

Dim a,b,ans
a = 5 : b=5
ans = Log10(a*a+2*a*b+b*b)
WScript.Echo ans

Function Log10(num)
    Log10=log(num)/log(10)
End Function

第三题求解

Dim a,b,ans
a=2.8 : b=0.8
ans = log(1+Abs((a+b)/(a-b))^10 )
WScript.Echo ans

第四题求解

' Square root in VBscript is sqr
Const PI = 3.1415926
Dim ans
ans = sqr(1+PI/2*Cos(48/180*PI))
WScript.Echo ans 3.1415

第五题求解

Dim x,ans
x=2
ans = 1/tan((1-x^3)/(1+x^3))
WScript.Echo ans

第六题求解

Dim x,y,ans
x=2 : y=2
ans = 1/(1+1/(1+1/(x+y)))
WScript.Echo ans