Контрольные вопросы:

1. Дайте определение подпрограммы.

2. Обозначьте основные отличия процедур и функций?

3. Сколько раз можно вызывать процедуру в основной программе?

4. Что называется параметром, и каково его назначение? Формальные, фактические параметры, их взаимосвязь.

5. Каковы отличия параметров-значений от параметров-переменных, особенности их описания и применения.

6. Для каждой из нижеописанных процедур указать, какие из ее параметров являются параметрами-значениями, а какие – параметрами-переменными:

А) Var c, d: integer;

procedure P(x, y: integer);

begin y:= x+1; end;

Б) Var c, d: integer;

procedure Q (x: integer; var y: integer);

begin y:= y+1; end;

7. Можно ли в процедуре пользователя не указывать аргументы и результаты?

Рекомендуемая литература: 1.1, 1.2, 1.3, 1.4, 1.5, 1.6, 1.8, 2.3, 2.4, 2.5.

Лабораторная работа №5 Тема: Обработка текстовых файлов

Цель: изучить на практике описание файлов текстового типа, алгоритмы создания, чтения и дозаписи файлов.

Вид работы: фронтальный.

Время выполнения: 2 часа.

Теоретический материал

Файл – это набор однотипных элементов, с последовательным доступом.

Особым типом файлов являются текстовые файлы. Эти файлы содержат некоторый текст, который состоит из обычных символов. Символы текстового файла разбиты на строки. Отличие текстового файла от файла типа Char, String заключается в том, что текстовый файл состоит из последовательности строк различной длины. В конце каждой строки для определения её длины ставится символ конца строки. Символ конца строки при просмотре файла не виден, так же как и символ конца файла.

Описание текстовых файлов выглядит следующим образом:

Var Имя файловой переменной: text;

Для работы с текстовыми файлами можно использовать все процедуры и функции, используемые при работе с файлами любых типов, за исключением (Seek, FilePos, FileSize) – дело в том, что заранее неизвестно, элементы какого типа находятся в файле.

Функция

Eoln(f) – логическая функция, принимает значение true, если достигнут конец строки, и False в противном случае.

Процедуры

Append(f) – открытие уже существующего текстового файла f для добавления данных в конец файла.

Writeln(f) – завершение текущей строки текстового файла при его записи (записывает символ конца строки).

Writeln(f,x1,x2,…,xn) – запись в файл f значений переменных x1,x2,…,xn, с завершением текущей строки.

Readln(f) – Переход к началу следующей строки файла f при его чтении.

Readln(f, x1,x2,…,xn) – Чтение n элементов файла f в переменные x1,x2,…,xn, с переходом на следующую строку файла.

Ход работы:

1. повторите описание файлов и операций над ними в Pascal;

2. решение всех задач осуществляется с использованием возможностей ИСР Pascal по обработке файлов текстового типа, а не с помощью текстового редактора;

3. оформите листинги программ в тетрадь.

Задания к работе:

Задание №1	Написать программу, которая будет создавать текстовый файл с именем f1.txt с некоторым содержанием
№ варианта	Содержимое текстового файла
1	Type f_file=text; {описание типа – текстовый файл}
2	Var x:text; {описание переменной текстового типа}
3	Type files=text; var f1, f2: files;
4	Var x1, x2: text; d: file of integer;
5	Var g: file of byte; {описание файла целых чисел}
6	Type qwerty=file of char; {тип символьного файла}
7	Type s_fil=file of string; (тип строкового файла)
8	Var g, x: file of boolean; {файловые переменные логических данных}
9	Type bool=file of Boolean; var g: bool;
10	Type qwerty=text; Var x: qwerty; y, z: file of byte;

Задание №2. Скопировать содержимое файла f1.txt в файл f2.txt с добавлением своих данных: фамилии, имени, группы, номера варианта. Каждое предложение записывать в файл f2.txt с новой строки. Вывести на экран содержимое файлов с указанием названия файла.