доступ к данным файла:
INPUT – это режим чтения информации из
файла.OUTPUT – режим записи информации в файл
APPEND – режим добавления информации в файл.
Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Операции над файлами Язык программирования BASIC
Содержание
- 1. Операции над файлами Язык программирования BASIC
- 2. Операции над файламиОткрытие файлаЧтение и запись обрабатываемых данныхЗакрытие файла
- 3. Открытие файлаOPEN имя_файла FOR режим AS #
- 4. Запись в файлРассмотрим пример записи в файл:OPEN
- 5. В результате работы программы мы получаем:Введите название
- 6. Пример 1. Создание базы данных автомобилей.CLSINPUT “введите
- 7. INPUT "номер автомобиля?";N$INPUT "цвет автомобиля?";С$INPUT "год производства
- 8. Чтение из файлаОсуществляется аналогично записи, но вместо
- 9. CLSINPUT "введите имя файла";F$OPEN F$ FOR INPUT
- 10. Изменение данных в файле Для изменения
- 11. Приведенная ниже программа в файле avto.dat изменяет
- 12. Добавление данных в файлУказание FOR APPEND в
- 13. CLSINPUT “введите имя файла”;F$OPEN F$ FOR APPEND
- 14. Скачать презентанцию
Операции над файламиОткрытие файлаЧтение и запись обрабатываемых данныхЗакрытие файла
Слайды и текст этой презентации
Слайд 3Открытие файла
OPEN имя_файла FOR режим AS # номер файла
Режимы определяющие
доступ к данным файла:
файла.OUTPUT – режим записи информации в файл
APPEND – режим добавления информации в файл.
Слайд 4Запись в файл
Рассмотрим пример записи в файл:
OPEN “capitalist.dat” FOR OUTPUT
AS #1
FOR x=1 TO 5
INPUT “введите название столицы”; F$
PRINT #1,
F$NEXT x
CLOSE #1
END
Слайд 5В результате работы программы мы получаем:
Введите название столицы? МОСКВА
Введите название
столицы? КИЕВ
Введите название столицы? ТАЛЛИН
Введите название столицы? РИГА
Введите название столицы?
МИНСК
Слайд 6Пример 1.
Создание базы данных автомобилей.
CLS
INPUT “введите имя файла”;F$
OPEN F$ FOR
OUTPUT AS #1
DO
Input “марка автомобиля? (Для окончания введите QWE)”;M$
IF UCASE$(M$)=“QWE”
THEN 1
Слайд 7INPUT "номер автомобиля?";N$
INPUT "цвет автомобиля?";С$
INPUT "год производства автомобиля?";G$
INPUT "продажная цена
автомобиля?";S$
PRINT #1,M$, N$, C$, G$, S$
LOOP
1: CLOSE #1
PRINT "файл сформирован"
Наберите
эту программу с именем создаваемого файла avto.dat
Слайд 8Чтение из файла
Осуществляется аналогично записи, но вместо режима OUTPUT используется
режим INPUT.
Прочитаем занесенные нами данные из файла avto.dat
Слайд 9CLS
INPUT "введите имя файла";F$
OPEN F$ FOR INPUT AS #1
PRINT "База
данных автомобилей на 17 декабря 2007 года"
I=1
DO
PRINT "вывести данные об";I;"автомобиле?"
INPUT
"Для окончания нажмите QWE, для продолжения IF UCASE$(M$)="QWE" THEN 1
INPUT #1, M$,N$,C$,G$,S$
I=I+1
LOOP UNTIL EOF(1)
1: CLOSE #1
PRINT "файл закрыт"
Оператор LOOP UNTIL EOF(1) означает,
что считывание ведется до тех пор,
пока не будет обнаружен символ конца файла,
а в скобках указан номер открытого файла.
Слайд 10Изменение данных в файле
Для изменения какой-либо записи, удаления
старых или добавления новых данных в последовательном файле необходимо открыть
два файла: подлежащий изменению и новый, в котором создается обновленная версия исходного файла.
Слайд 11Приведенная ниже программа в файле avto.dat
изменяет "МОСКВИЧ" на "МЕРСЕДЕС"
OPEN
"avto.dat" FOR INPUT AS #1
OPEN "avto2.dat" FOR OUTPUT AS #2
FOR
I=1 TO 5INPUT #1,M$, N$, C$, G4, S$
IF UCASE$ (M$)="МОСКВИЧ" THEN M$="МЕРСЕДЕС"
PRINT #2, M$, N$, C$, G$, S$
NEXT I
CLOSE 1,2
KILL "avto.dat"
NAME "avto2.dat" AS "avto.dat"
END
Слайд 12Добавление данных в файл
Указание FOR APPEND в операторе OPEN подготавливает
файл для вывода данных и смещает указатель на конец файла.
Последующие операторы приписывают новую информацию к уже имеющейся. В предложенной далее программе в файл данных об автомобилях добавляются сведения о двух новых поступлениях.
Слайд 13CLS
INPUT “введите имя файла”;F$
OPEN F$ FOR APPEND AS #1
DO
Input “марка
автомобиля? (Для окончания введите QWE)”;M$
IF UCASE$(M$)=“QWE” THEN 1
INPUT "номер автомобиля?";N$
INPUT
"цвет автомобиля?";С$INPUT "год производства автомобиля?";G$
INPUT "продажная цена автомобиля?";S$
PRINT #1,M$, N$, C$, G$, S$
LOOP
1: CLOSE #1
PRINT "файл сформирован"
