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

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