Товарищи, помогите!

ИМХО, у тебя где то опечатка :)

(0) ты хоть сам понял вопрос?

Книга знаний: Математические вычисления в 1С

(0) Ты это, проспись, а потом похмелись... и всё пройдет

Ну опечатался. Интересует алгоритм вычисления натурального логарифма комплексного числа

Приведи к экспоненциальному виду число и вычисляй. Только про период не забудь.

В ряд Тейлора разложи и вычисли - делов то.

а немного поточнее можно? :)

Ты что вышку прогуливал?
LN(W*exp(i*FI))=LN(ABS(W))+i*(FI±2*PI*K), K=1,2...
При FI в интервале от -PI до PI имеем главное значение логарифма.

Посещал из редка, получил на экзамене 5. С годами все забылось напрочь!
В целом задачу решил:
 r:=sqrt(sqr(x.re)+sqr(x.im));
 fi:=arctan(x.im/x.re)
 re:=Ln(sqrt(sqr(x.re)+sqr(x.im)));
 im:=arctan(x.im/x.re);
Осталось понять что делать с частным случаем, когда действительная часть равна 0?

А какие проблемы? Главное что модуль числа не нуль, только в этом  случае логарифм не существует.

А нет :) Понял, сейчас оформлю и напишу!

function LnC(x: Complex): Complex;
var
 r, fi: real;
begin
 r:=sqrt(sqr(x.re)+sqr(x.im));
 LnC.re:=Ln(r);
 if x.re<>0 then begin
   fi:=arctan(x.im/x.re);
   LnC.im:=arctan(x.im/x.re);
 end else
   LnC.im:=pi/2;
end;
Всем спасибо за помощь!