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

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