写出下列数学表达式的vb算术表达式

1个回答

  • Function f1(x As Integer, y As Integer) As Double

    f1 = Sqr(x * x + y * y)

    End Function

    Function f2() As Double

    Const PI = 3.1415926

    f2 = Cos(30 * PI / 180) * Cos(30 * PI / 180) - Sin(30 * PI / 180) * Sin(30 * PI / 180)

    End Function

    Function f3(x As Integer) As Double

    f3 = 1 + x / (1 + x / (x + 1))

    End Function

    Function f4(x As Integer) As Double

    Const e = 2.7182818

    f4 = Log(x) / Log(10) + e * e * e / ((x * x) ^ (1 / 3))

    End Function

    Function f5(x1 As Integer, x2 As Integer, x3 As Integer) As Double

    f5 = Sqr(Abs(2 * x1 + 3 * x2 * x3))

    End Function

    Function f6(x As Integer, y As Integer, z As Integer) As Double

    Const PI = 3.1415926

    Const e = 2.7182818

    f6 = Log((e ^ (x * y) + Abs(1 / Tan(z * PI / 180) + Sin(x * PI / 180) * Sin(x * PI / 180) * Sin(x * PI / 180))) / (x + y + z)) / Log(e)

    End Function