* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
Г л а в а XII. Б е й с и к - H E L P 141 П р и вызове функции Вы можете указать, что значение аргумента не должно изменяться функцией. Д л я этого заключите аргумент в круглые скобки. Пример: Программа Cergey(см.гл.12) иллюстрирует вызов процедуры FUNCTION. См. также D E C L A R E , D E F F N , E X I T , SHARED, STATIC, SUB GET-оператор(файл) GET считывает из файла прямого доступа в буфер или в переменную. PUT записывает содержимое переменной или буфера в файл прямого доступа. Формат записи: GET [#]номер файла%[,[номер PUT [#]номер файла%[,[номер где номер_файла% номер открытого файла. номер_записи& для файлов прямого доступа — номер записи для чтения или записи. Для двоичных файлов — позиция байта, где начина¬ ется чтение или запись. переменная для G E T — переменная, используемая для приема ввода из файла. Для P U T — переменная, содержащая вывод для запи¬ си в файл. Переменной обычно является переменная опреде¬ ленного пользователем типа данных. Пример: TYPE T e s t R e c o r d S t u d e n t AS STRING * 20 S c o r e AS SINGLE END TYPE DIM M y C l a s s AS T e s t R e c o r d OPEN "FINAL.DAT" FOR RANDOM AS # 1 LEN = L E N ( M y C l a s s ) M y C l a s s . S t u d e n t = "Олег Дворченко" M y C l a s s . S c o r e = 99 PUT # 1 , 1 , M y C l a s s CLOSE #1 OPEN "FINAL.DAT" FOR RANDOM AS # 1 LEN = L E N ( M y C l a s s ) GET # 1 , 1 , M y C l a s s PRINT "СТУДЕНТ:", M y C l a s s . S t u d e n t PRINT "СЧЕТ:", M y C l a s s . S c o r e CLOSE #1 K I L L "FINAL.DAT" записи&][,переменная]] записи&][,переменная]] См. также F I E L D , G E T , P U T ( Г р а ф и к а ) , LSET, RSET, M K n $ , CVn, Функ ции T Y P E