Kod:
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End FunctionKod:
Dim MyAngle, MyLog
' Define angle in radians.
MyAngle = 1.3
' Calculate inverse hyperbolic sine.
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
#2
@benbendedeilem
Son Düzenleme: 10/05/2012, 18:47, Düzenleyen: accessman.
