Оцените презентацию от 1 до 5 баллов!
Тип файла:
ppt / pptx (powerpoint)
Всего слайдов:
22 слайда
Для класса:
1,2,3,4,5,6,7,8,9,10,11
Размер файла:
205.00 kB
Просмотров:
140
Скачиваний:
0
Автор:
неизвестен
Слайды и текст к этой презентации:
№1 слайд
Содержание слайда: Файловый тип данных
Turbo Pascal
Операции для работы с файлами
11 класс
№2 слайд
Содержание слайда: Общие положения
Множества значений или переменных с одним общим именем называются структурированными (составными) типами.
Основные разновидности структурированных типов:
регулярный тип (массивы);
комбинированный тип (записи);
Файловый тип (файлы);
Множественный тип (множества).
№3 слайд
Содержание слайда: Описание
Файл – это область памяти на внешнем носителе, в которой хранится некоторая информация.
№4 слайд
Содержание слайда: Объявление файловой переменной
Var <имя файла>: File Of <тип элементов>;
Например:
var
f1: file of char;
f2: file of integer;
f3: file;
t: text;
№5 слайд
Содержание слайда: Типы файлов Турбо Паскаль
Турбо Паскаль поддерживает три файловых типа:
текстовые файлы;
типизированные файлы;
нетипизированные файлы.
Переменную файлового типа описывают одним из трех способов:
file of тип - типизированный файл (указан тип компоненты);
text - текстовый файл;
file - нетипизированный файл.
№6 слайд
Содержание слайда: Файл, в описании которого указывается тип элементов, называется типизированным. Все элементы файла пронумерованы начиная с нуля.
Файл, в описании которого указывается тип элементов, называется типизированным. Все элементы файла пронумерованы начиная с нуля.
С каждым файлом связан так называемый файловый указатель. Это неявно описанная переменная, которая указывает на некоторый элемент файла. Все операции производятся с элементом, на который указывает файловый указатель.
№7 слайд
Содержание слайда: Обработка файлов
Связь переменной файлового типа с файлом на диске.
Чтение из файла.
Закрытие файла.
Признак конца файла.
Запись в файл.
Установка указателя.
Определение номера элемента.
Определение количества элементов в файле.
Удаление и переименование файлов.
№8 слайд
Содержание слайда: Связь переменной файлового типа с файлом на диске.
Любые дисковые файлы становятся доступными программе после связывания их с файловой переменной, объявленной в программе. Все операции в программе производятся только с помощью связанной с ним файловой переменной.
Для установления связи служит процедура
Assign(<имя файловой переменной>,’<имя файла на диске>’);
Например: Assign(F1, ‘A:int.dat’);
№9 слайд
Содержание слайда: Чтение из файла.
Под чтением из файла понимается пересылка данных из внешнего файла, находящегося на диске, в оперативную память.
Для чтения из файла необходимо открыть файл для чтения с помощью процедуры RESET(<имя файловой переменной>);
Чтение данных из файла выполняется процедурой
READ (<имя файловой переменной>,’<имя переменной>);
Примечание: переменная должна иметь тот же тип, что и компоненты файла.
№10 слайд
Содержание слайда: Закрытие файла.
После того как данные из файла прочитаны, его необходимо закрыть посредством процедуры
CLOSE (<имя файловой переменной>);
Признак конца файла.
Так как число элементов файла заранее не известно, необходимо уметь определять, что файл кончился. Для этого используется логическая функция
EOF (<имя файловой переменной>);
Она принимает истинное значение (True), если достигнут конец файла, и ложное (False) – в противном случае.
№11 слайд
Содержание слайда: Запись в файл.
Под записью в файл понимается вывод результатов программы из оперативной памяти ЭВМ в файл на диске.
Для записи в файл необходимо открыть файл для записи посредством процедуры
REWRITE(<имя файловой переменной>);
Запись данных в файл выполняется процедурой
WRITE(<имя файловой переменной>, <значение>);
После работы с файлом его необходимо закрыть.
№12 слайд
Содержание слайда: Пример 1
Прочитать из файла целые числа и вывести их на экран:
Assign(F1, ‘A: INT.DAT’);
{связываем файловую переменную с файлом на диске}
Reset(F1); {открываем файл для чтения}
While Not EOF(F1) Do
{пока не достигнут конец файла F1}
Begin
Read (F1, n); {считываем очередное число}
Write (n, ‘ ‘); {выводим его на экран}
End:
Close (F1); {закрываем файл}
№13 слайд
Содержание слайда: Пример 2
Ввести с клавиатуры и записать в файл DAN1.DAT последовательность целых чисел. Признак конца ввода чисел - 0.
Program Exampl_2;
Var F: File Of Integer;
n:= Integer;
Begin
Assign (F, ‘DAN1.DAT’);
{связываем файловую переменную с файлом на диске}
Rewrite(F); {открываем файл для записи}
Writeln (‘Конец ввода чисел – 0’);
Repeat {Пока не будет введен 0}
Writeln (‘Ведите число’);
Readln(n); {Если введено число, отличное от 0, то записываем его в файл}
If n<>0 Then Write(F, n);
Until n=0; {Если введен 0, то выходим их цикла}
Close (F);
End.
№14 слайд
Содержание слайда: Домашнее задание
1) В файле DAN1.DAT (см. предыдущую задачу) записаны целые числа. Вычислить сумму элементов файла и результат вместе с исходными данными записать в файл DAN2.DAT.
2) Какие из следующих операторов правильные?
Assign(f1, 'A:STR1.DAT') ;
Reset(f1,f2) ;
Rewrite;
Assign(f2,'C:\TT\TAB1.DAT')
Rewrite (f1);
№15 слайд
Содержание слайда: Текстовые файлы
Текстовые файлы – это файлы, содержащие символы, разделенные на строки. Строки могут иметь различную длину, и в конце каждой строки стоит признак конца строки. Для их описания используется служебное слово Text:
Var A: Text;
№16 слайд
Содержание слайда: Обработка текстовых файлов
Для обработки текстовых файлов используются те же процедуры и функции, что и для обработки обычных типизированных файлов.
Для связывания файловой переменной с файлом на диске употребляется процедура Assign.
Для чтения данных применяется процедура Read.
Если необходимо после чтения данных перейти на следующую строку, то используется процедура Readln.
№17 слайд
Содержание слайда: Продолжение
Процедура Write записывает данные в текущую строку.
Если надо записать данные и перейти к следующей строке, то можно использовать процедуру Writeln, которая записывает в файл признак конца строки и устанавливает файловый указатель на начало следующей строки.
№18 слайд
Содержание слайда: Продолжение
Так как в строках может быть разное количество символов, имеется логическая функция
Eoln (<имя файловой переменной текстового файла>),
которая принимает значение True, если достигнут конец строки.
№19 слайд
Содержание слайда: Продолжение
Кроме перечисленных процедур и функций, к текстовым файлам применяется процедура
Append (<имя файловой переменной текстового файла>).
Она открывает файл для "дозаписи", помещая файловый указатель в конец файла.
№20 слайд
Содержание слайда: Пример 3
Создать текстовый файл, содержащий только целые числа, в каждой строке может быть несколько чисел, которые разделяются пробелом. Вывести на экран все числа с учетом разбиения на строки и подсчитать количество элементов в каждой строке.
№21 слайд
№22 слайд
Содержание слайда: Решение
Program Example_3;
Var F: Text;
x, k: Integer;
Begin
Assign (F, 'UNT1.TXT');
{Связываем файловую переменную с файлом на диске}
Reset (F); {Открываем файл для чтения}
While Not Eof(F) Do {Пока не достигнут конец файла}
Begin
k:=0; {Счетчик элементов строки}
While Not Eoln(F) Do {Пока не достигнут конец строки}
Begin
Read(F, x) ; {Считываем очередное число)
Write(x,' '); {Выводим его на экран}
Inc(k); {Увеличиваем счетчик }
End;
Writeln( ' В строке ', k, ' элементов') ;
Readln(F); {Переходим к следующей строке файла}
End;
Close(F); {Закрываем файл}
Readln;
End.