Файл: Основные понятия Файл в Паскале.ppt

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 09.01.2024

Просмотров: 43

Скачиваний: 1

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

Основные понятия

Файл в Паскале


Состоит из однотипных данных (integer,real и т.д.).
С данными файла можно производить две основные операции: запись и чтение.


Как записать в файл данные разного рода (цифры, буквы?)

1. Описание файла


Описание файла производится в разделе описания переменных, при этом указывается имя файловой переменной (логическое имя файла) и ее тип.
Например:
Var f : file of integer;
или
Var f1:text;

2. Установление соответствия между логическим и физическим именем файла


Assign(логическое имя, физическое имя)
Например, assign(f,’data.txt’);

3. Запись в файл / чтение из файла


Rewrite(f); - открытие нового файла для записи.
Reset(f); - открытие существующего файла для чтения или записи.
Write(f,a); - запись в файл.
Read(f,a); - чтение из файла.

4. Закрытие файла


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

Проверка конца файла


Eof(f) – логическая функция, ее значение – «истина», если курсор находится в конце файла и «ложно», если это не так.

ПРИМЕР


Записать в файл 10 цифр, вводимых пользователем.

Var F:text;


Var F:text;
a,i:integer;
Begin


Assign(f,’data.txt’);


Rewrite(f);


Writeln(‘введите 10 цифр’);


For i:=1 to 10 do
Begin
Read(a);
Write(f,a)
End;


Close(f);
end.


ПРОГРАММА

ПРИМЕР


Написать программу сложения 5 чисел, записанных в файле.



Var a,s,i:integer;
F:text;
Begin


Assign(f,’primer2.txt’);


Reset(f);


S:=0;
While not eof(f) do
Begin
Read(f,a);
S:=S+a;
End;


Close(f);
Writeln(‘Cумма=’,s)
end.


ПРОГРАММА

Задание на работу


Составить программу, записывающую в файл только четные числа из тех чисел, которые вводит пользователь.
Составить программу, вычисляющую произведение 5 чисел, записанных в файле.

Домашнее задание


Дан файл целых чисел. Перепишите четные элементы файла в один дополнительный файл, а нечетные – в другой.