
* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
Глава X. Ф а й л ы д а н н ы х 91 Ввести будете Ввести Ввести Ввести Ввести будете Ввести Ввести Ввести Ввести будете ФИО преподавателя: Петров П.П. еще вводить(д н)? д число (дд): 2 1 день недели (нн): ср кол-во часов (чч): 6 ФИО преподавателя: Сидоров С.С. еще вводить(д н)? д число (дд): 22 день недели (нн): чт кол-во часов (чч): 15 ФИО преподавателя: Иванов И.И. еще вводить(д н)? н 10.14. О п е р а т о р G E T GET считывает из файла в буфер прямого доступа или в переменную. Формат записи оператора GET: GET где номер_файла% номер файла, указанного в операторе OPEN. номер_записи&для файлов прямого доступа — номер записи для чтения. Це¬ лочисленное значение номера записи может находиться в диап а з о н е о т 1 до 32767. П о д э т и м н о м е р о м з а п и с ь б у д е т п о м е щ е на в файл и в дальнейшем считана. Если номер записи опущен, то считывается запись, следующая за последней, прочитанной по оператору GET. Если же это первый оператор GET в про¬ грамме, то читается запись с номером один Л ю б а я попытка при записи или чтении выйти за границы буфера вызывает со¬ общение об ошибке. Для двоичных файлов — позиция байта, где начинается чте¬ ние или запись. переменная переменная, в которую читается запись. Переменной обычно является переменная определенного пользователем типа дан¬ ных. В качестве примера приводятся опять же два фрагмента программы, которые читают файл, созданный в предыдущих примерах 10.13.1 и 10.13.2 Пример 10.14.1: Считывание файла произвольного доступа с использованием буфера, создан¬ ного в примере 10.13.1 CLS OPEN "FINAL.DAT" FOR RANDOM AS # 1 'ОТКРЫВАЕМ ФАЙЛ 'ПРЯМОГО 'ДОСТУПА 'создаем буфер FIELD # 1 , 12 AS c $ , 16 AS d $ , 19 AS c t $ , 20 AS f $ a 1 : INPUT "Введите номер записи"; nom% GET # 1 , nom% [#]номер файла%[,[номер записи&][,переменная]]