Question

Как вычислить в Турбо Паскаль y = 2*ln (X)+3.
Входные данные x, выходные y.
Основная проблема в том, что необходимо, если пользователь вводит отрицательное число x вывести не ошибку, а результат в комплексном числе.

Answer 1

Если без изысков с определением комплексного типа данных и функции от него (а по хорошему пожалуй так и надо), то можно  как в документе, основная идея (то, что обсуждалось в комментах). Тут результат в любом случае выдается как комплексное число. Если должен получиться результат вещественный, то мнимая часть просто будет равной нулю.
Хотя можно устроить распечатку вещественного результата без нулевой мнимой части.

d9410f69032b0068eab51dbc342154ff.pdf

Answer 2

в том то и дело, она показывает результат, просто печатая несколько переменных. А мне надо чтобы это все считалось, как одна переменная ReY:6:3, '+', ImY :5:3,'i', но как, если это просто печать?

Answer 3

А зачем Вам одна переменная? Вы что-то дальше хотите с этим делать?

Answer 4

Чтобы это было именно переменной, нужно ввести тип комплексный в виде записи из двух переменных. А если просто так, "для прикола" - превратите в символьную строку.

Answer 5

type Cplx=record Re,Im:real end; var x:Cplx; И работайте....

Answer 6

Спасибо