我有VB6的該位切出的一個項目,我的工作的: Public Function C_Ln(c As ComplexNumber) As ComplexNumber
Set C_Ln = toComplex(Log(C_Abs(c)), Atan2(c.Imag, c.Real))
End Function
VB6的日誌()函數爲基礎-E。我想製作這個版本來做base-2,base-1
使用Ada(GNAT):我需要確定給定值的十次冪。最明顯的方法是使用對數;但是沒有編譯。 with Ada.Numerics.Generic_Elementary_Functions;
procedure F(Value : in Float) is
The_Log : Integer := 0;
begin
The_Log := Integer(Log(Value,