Функция Clоsе вызывается стандартной процедурой Clоsе для
закрытия связанного с устройством текстового файла. (Процедуры
Rеsеt, Rеwritе, Appеnd также вызывают функцию Clоsе, если файл,
который они открывают, уже был открыт.) Если в поле Моdе находит-
ся fmOut, то перед вызовом функции Clоsе файловая система Турбо
Паскаля обращается к функции InOut. Это гарантирует вывод на уст-
ройство всех символов.