Модуль для совместимости с учебными примерами.

PROCEDURE Char (ch: CHAR)

Записывает символ в журнал.

PROCEDURE Ln

Записывает возврат каретки в журнал.

PROCEDURE Int (i, n: INTEGER)

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

PROCEDURE Real (x: REAL; n: INTEGER)

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

PROCEDURE String (str: ARRAY OF CHAR)

Записывает строку в лог.