dimitriy7
BANNED | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
При установленном {$I-} контролирует правильность работы процедур ввода-вывода (reset, read, write, и т.п.). Пока все хорошо, IOResult=0, в случае ошибок - не равен 0.
Конструкция
Код:
reset(f);
if IOResult<>0 then ...
|
проверяет наличие файла f - если файл существует и может быть открыт для чтения, то IOResult будет =0, а если не существует - то IOResult будет <>0. Таким образом проверяем факт наличия нужного файла и определяем, надо ли создавать новый. А без этой проверки программа даст сбой, если файл f не существует.
Конструкция
Код:
read(f,a[i]);
if IOResult<>0 then ...
|
проверяет, смогли ли мы выполнить чтение из файла. По условию - в файле должны быть только числа. Если вдруг процедура read(f,a[i]) не сможет преобразовать прочитанную из файла строку в число (например, входной файл создавался вручную и кто-то по невнимательности написал, например, 2,7 вместо 2.7) программа даст сбой, поэтому опять-же после каждого акта чтения надо вручную проверять, а удалось ли вообще что-нибудь прочитать...
|
Всего записей: 2946 | Зарегистр. 09-10-2008 | Отправлено: 15:53 09-01-2012 | Исправлено: dimitriy7, 16:04 09-01-2012 |
|
