ПРАКТИЧЕСКОЕ ЗАНЯТИЕ РАЗРАБОТКА ПРОГРАММ РАБОТЫ С НЕСТРУКТУРИРОВАННЫМИ ФАЙЛАМИ

ПРАКТИЧЕСКОЕ ЗАНЯТИЕ РАЗРАБОТКА ПРОГРАММ РАБОТЫ

С НЕСТРУКТУРИРОВАННЫМИ ФАЙЛАМИ

1.     ЦЕЛЬ ЗАНЯТИЯ

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

2.     ИНФОРМАЦИОННЫЙ БЛОК

Пример описания массива записей:

Const n=10;

Type Zap=Record

Kod:integer Name:string; End;

Var A:array [1..n] of zap;

3.     ИСПОЛНИТЕЛЬНЫЙ БЛОК

1)       Создать текстовый файл (файл с расширением *.txt) для 7 записей, со- держащих поля: Фамилия, имя, пол, месяц рождения. Данные вводить через En- ter (в столбец). Сохранить файл.

2)       В программе описать тип запись Zap с соответствующими полями.

3)       Описать тип – одномерный массив Mas из 7 элементов, каждый из ко- торых имеет тип запись.

4)       Описать переменную типа «текстовый файл», переменную A типа мас- сив Mas.

5)       Все записи из файла передать в массив. Для этого организовать цикл на 7 повторений, поочередно считывая элемент из файла поместить его в соответ- ствующее поле элемента массива. Например:

Readln(f, A[i].fam);

6)       В полученном массиве определить, сколько человек празднуют дни рождения весной.

7)       Вывести на экран список из фамилий и имен людей, имеющих задан- ный пол.

4.     КОНТРОЛЬНЫЕ ВОПРОСЫ

1)       В какой структуре на Ваш взгляд, удобнее хранить и обрабатывать разнотипную информацию? Обоснуйте свой ответ.

2)       Что произойдет при выполнении процедур Reset(f) и Read(f, A[i]), если в разделе описания данных:

Type

Zap=Record

Fam: string;

Var

Age:byte; End;

Mas=array[1..n] of Zap;

F: file of Zap;

A: mas;

5.     ЗАДАНИЯ ДЛЯ САМОСТОЯТЕЛЬНОГО ВЫПОЛНЕНИЯ

1)   Создать тип с описанием товара: код, наименование, цена за единицу товара, количество и сумма. Каждое действие оформить в виде подпрограммы.

а) Вывести наименование и цену товаров, коды которых лежат в диапазоне

100 … 120.

б) Подсчитать итоговые суммы по каждому товару. в) Вывести название товара с наибольшей ценой.

2)    Определить тип для представления анкеты школьника, включающей в себя ФИО, возраст, номера школы и класса и оценки по каким-то пяти предметам. Выдать сведения о школьнике с наивысшим средним баллом.

Скачано с www.znanio.ru