var
float : Double;
begin // Получение натурального
логарифма 2
float := Ln(2); // Показ этого значения
ShowMessage('Ln(2) = '+FloatToStr(float)); // Получение экспоненты этого
значения - полностью отменяет операцию Ln
float := Exp(float); // Показ этого значения
ShowMessage('Exp(Ln(2)) = '+FloatToStr(float));
end;