Пример:
СПример использования оператора CLOSE WRITE (*,'(А\)') 'Filе nаmе?’
READ(*,'(А)') FNАME
OPEN (7, FILE=FNАME, STАTUS='NEW')
С
........................
С
CЗакрытие файла c отказом от файла CLOSE (7, STАTUS='DELETE')
ОПЕРАТОР CLOSE |
31 |
Оператор READ. |
Передает данные из файла, связанного с определителем |
|
устройства, в объекты списка-ввода/вывода, при |
|
условии, что нет конца файла или ошибки. |
|
Синтаксис: |
|
READ (определитель устройства |
|
[, определитель формата] |
|
[,IOSTAT=состояние] |
|
[,RЕС=номер записи] |
|
[,ERR=метка] |
|
[,END=метка1] ) список-ввода/вывода |
|
ОПЕРАТОР READ |
32 |
Оператор WRITE. |
Передает данные из объектов списка-ввода/вывода в файл, |
|
связанный с указанным устройством. |
|
Синтаксис: |
|
WRITE (определитель устройства |
|
[, определитель формата] |
|
[,IOSTAT=состояние] |
|
[,RЕС=номер записи] |
|
[,ERR=метка] |
|
[,END=метка1]) список-ввода/вывода |
|
ОПЕРАТОР WRITE |
33 |
ОПЕРАТОРЫ READ и WRITE |
34 |
ОПЕРАТОРЫ READ и WRITE |
35 |
Остальные параметры если они есть, могут появляться в любом порядке.
36
ОПЕРАТОРЫ READ и WRITE |
37 |
ОПЕРАТОРЫ READ и WRITE |
38 |
Если номер записи определен для
файла не типа прямого доступа возникнет ошибка!
Первая запись в файле имеет номер
равный 1.
39
ОПЕРАТОРЫ READ и WRITE |
40 |