Файловый тип данных Вопросы для самопроверки

Файловый тип данных

Вопросы для самопроверки ? Откуда поступают данные в программу? С клавиатуры ? Куда выводится результат программы? На экран ? Сохранялись ли исходные данные и результаты для последующего использования? Нет

Вывод При каждом запуске программы данные приходилось вводить заново. А если их много? Хотелось бы, чтобы данные хранились не в оперативной памяти, а во внешней (долговременной). Для этого используются файлы.

Понятие файла С одной стороны Файл – это область памяти на внешнем носителе, в котором хранятся однотипные данные (физический файл) С другой стороны Файл – это структурный тип данных, используемый в программировании (логический файл)

Типы файлов Язык Паскаль поддерживает три файловых типа: текстовые файлы; n типизированные файлы; n нетипизированные файлы. n Тип файла определяет способ хранения информации в файле.

Текстовые файлы Описание в программе: Var f : text; Это файлы, содержащие символы, разделенные на строки. В конце каждой строки стоит признак конца строки (EOLN), а в конце файла признак конца файла (EOF)

Свойства текстовых файлов 1. 2. 3. 4. 5. Элементами являются символы. Структура файла строковая. При чтении и записи числа преобразуются автоматически. Файлы не имеют прямого доступа. Есть признак конца строки. Применима процедура Append – добавление данных.

Процедуры и функции для работы с текстовыми файлами

Assign(файл, ‘имя файла на диске’); Связывает имя файловой переменной в программе с файлом на диске. Пример: Assign(f, ’c: myfilefile. txt’);

Rewrite(файл); Создает на диске новый файл. Если файл с указанным именем уже существовал, то он будет очищен. Пример: Rewrite(f);

Reset(файл); Открывает файл для чтения. Пример: Reset(f);

Read(файл, элемент) Читает данные из файла. Пример: Read(f, x); Readln(f, y);

Write(файл, элемент); Записывает данные в файл. Пример: Write(f, x); {запись в текущую строку} Writeln(f, y); {запись с переходом на новую строку}

Append(файл); Открывает текстовый файл для добавление элемента. Пример: Append(f); Write(f, x);

Close(файл); Закрывает файл для завершения работы с файлом. Если процедура не будет использована, то часть содержимого файла может быть утеряна. Пример: Close(f);

Разбор задач Пример 1. Создать текстовый файл в программе и записать в него любое целое число. var f : text; z : integer; begin assign(f, 'C: fil 1. txt'); rewrite(f); z: =2; write(f, z); close(f); end.

Разбор задач Пример 2. Создать вручную на диске текстовый файл fil 99. txt и заполнить его по образцу: 1234567 -1 -2 -3 -4 -1 -2 Затем вывести содержимое файла на экран и посчитать количество элементов файла.

? Как создается файл с расширением *. txt? ? Какие переменные будут в программе? Стандартная программа Блокнот f – файловая переменная х – очередное число k – количество элементов в файле

Var f : text; x, k : integer; Begin assign(f, ‘c: fil 99. txt’); Reset(f); While not(eof(f)) do Begin k: =0;

While not(eoln(f)) do Begin read(f, x); write(x, ’ ‘); k: =k+1; End; Writeln; Readln(f); End; Close(f); writeln(‘k=‘, k); End.

Домашнее задание 1. Выучить новый материал 2. ИДЗ № 11