Алгоритмы и программы. Афанасьева Т. В - 99 стр.

UptoLike

Составители: 

99
readln(x);
if (x='y') or (x='Y') then
erase(f) {удаление файла}
end;
findnext(s) {поиск следующего файла *.bak}
end;
end;
end.
Контрольные вопросы
1. Что такое файл?
2. Какие типы файлов применяются в Turbo Pascal?
3. Основные функции для работы с файлами.
4. Основные правила использования файлов в программах.