Переделать из типизированного в текстовый тип - Pascal ABC
Формулировка задачи:
Есть задача: Дан файл f, компоненты которого являются целыми числами. Никакая из компонент файла не равна нулю. Файл f содержит столько же отрицательных чисел, сколько и положительных. Используя вспомогательный файл h, переписать компоненты файла f в файл g так, чтобы в файле gшли сначала положительные, а потом отрицательные.
вот код:
Все работает, я хочу, чтобы можно было просматривать содержимое файлов, а не машинный код. Т.е. сделать их текстовыми. Спасибо!
Решение задачи: «Переделать из типизированного в текстовый тип»
textual
Листинг программы
writeln('Введите в файл не менее 4х пар целых положительных и отрицательных чисел,'); writeln('общее количество кратно 4, окончание ввода 0');
Объяснение кода листинга программы
- Введите в файл не менее 4х пар целых положительных и отрицательных чисел, - это сообщение выводится для пользователя и информирует его о том, что требуется ввести не менее 4 пар чисел.
- общее количество кратно 4 - это условие, которое проверяет, что количество введенных пар чисел кратно 4.
- окончание ввода 0 - это сообщение, которое выводится для пользователя и информирует его о том, что ввод завершен и ожидается результат.