Примеры определения переменных типа запись

1) Для хранения информации о точке на плоскости.

Var

R:record x:real; y:real end;

2) Переменная должна хранить фамилию студента и шесть оценок за экзамены в сессию.

Type

TSessia=record

Fam:string[40];

Marke:array [1..6] of byte;

End;

Var

S:TSessia;

3) Переменная должна хранить анкетные данные сотрудника: фамилия, дата рождения, адрес.

Type

Tdate=record

Day:1..31;

Month:1..12;

Year:word

End;

Tadress=record

City:string[30];

Street:string[50];

NumHause, NumRoom:byte

End;

Temploye=record

Fam:string[40];

Date:Tdate;

Adress:Tadress

End;

Var

E:Temploye;

Представление переменной типа запись в памяти

Переменная R для представления точки на плоскости

x	y

Переменная S типа Tsession

Fam	marke

Переменная Е типа Temploye

	day	month	year	City	Street	NumHouse	NumRoom
Fam	Date	Adress

Доступ к значению поля в записи

Для доступа к значению поля используется уточненное имя. Уточненное имя формируется по правилу: имя переменной. имя поля. Если имя поля в свою очередь представляет переменную типа запись, то правило распостраняется на имя этого поля.

Примеры формирования имени.

1) Имя поля переменной R.

R.x или R.y

2) Доступ к значению оценки по третьему экзамену в сессию.

S.marke[3]

3) Доступ к значению поля City переменной E.

E.Adress.City

Расчет объема памяти, выделяемого переменной типа запись

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

Требования к выполнению лабораторной работы

Требуется создать сначала консольное одномодульное приложение, затем из одномодульного создать многомодульное приложение.

Создание одномодульного приложения

1. Разработать структуру данных массив, элементами которой являются записи. Структура одной записи определена вариантом.

2. Разработать подпрограммы:

· заполнение отдельной записи;

· вывод записи;

· добавление нового элемента в динамический массив;

· сортировка мАссива (методом, указанным в варианте);

· подзадач, которые будут выявлены вами при разработке дополнительной операции;

· вывод массива записей;

· вывод результатов операций.

Примечание. Обмен данными с подпрограммами обеспечить через механизм параметров.

3. Разработать консольное приложение, управляемое пользовательским интерфейсом и продемонстрируйте работу всех операций.

Создание многомодульного приложения.

1. Создайте модуль Unit_Def и разместите в нем:

· определение типа записи;

· определение типа массива записей.

2. Создайте модуль Unit_Input_Output, включите в него модуль Unit_Def и разместите в нем подпрограммы

· заполнение отдельной записи;

· вывод записи;

· добавление нового элемента в динамический массив;

· вывод массива записей;

· вывод результатов операций.

3. Создайте модуль Unit_Operation и включите в него:

· модуль Unit_Def;

· подпрограммы по сортировке массива и дополнительным операциям.

4. Разработайте новое многомодульное приложение, демонстрирующее выполнение операций над массивом записей и использующее, разработанные подпрограммы. Для демонстрации всех операций разработайте пользовательский интерфейс. План создания приложения:

· создать консольное приложение;

· подключить к нему модули;

· разработать интерфейс на основе текстового меню;

· отладить проект, включая операции последовательно, а не все сразу.

Таблица 5

Варианты заданий

	Структура записи	Метод сортировки	Дополнительная операция
	Сведения о студенте: Номер зачетной книжки, Фамилия, Имя, Дата рождения, Номер телефона, Дата поступления, Признак удаления записи	Метод прямого выбора. Отсортировать массив по дате рождения(перевести ее сначала в число исчисляя начало 1900 годом)	Найти и удалить всех окончивших институт (т.е. более срок обучения более 6 лет)
	Сведения о спортсмене:Фамилия, Имя, Дата рождения, Вес, Рост, Пол	Метод “Пузырька”. Отсортировать массив по полю Вес.	Сформировать список спортсменов мужчин не старше 22 лет
	Сведения о расписании занятий: Номер группы, название дисциплины, вид занятия (лек, лаб, практ), номер аудитории, день недели, номер пары, фамилия преподавателя..	Отсортировать массив по номеру группы, используя алгоритм Шейкер сортировки.	Сформировать список групп, у которых лекция проходит в потоке.
	Сведения о жителе: Фамилия, Город, Адрес: улица, дом, квартира.	Отсортировать массив методом вставки, упорядочивая по возрастанию по городам	Вывести фамилии двух жителей, живущих в разных городах по одному адресу.
	Сведения о книге: Автор, Название, Инвентарный номер, Издательство, Количество страниц, Цена	Отсортировать массив по по Автору, используя метод улучшенного Пузырька.	Вставить новую книгу в упорядочен -ный массив.
	Сведения об успеваемости одного студента по одной дисциплине: Номер зачетной книжки, Шифр группы, Название дисциплины, Дата получения оценки, Оценка, Фамилия преподавателя[1].	Отсортировать массив методом Вставки по Названию дисциплины	Сформировать ведомость успеваемости группы по определенной дисциплине (Шифр группы и Название дисциплины вводятся). Найти средний балл группы по Дисциплине.
	Учет выдачи книг пользователям библиотеки. Карточка пользователя библиотеки содержит сведения, о выданной книге: Инвентарный номер, Автор, Название, Дата выдачи, Дата возврата	Отсортировать по дате выдачи методом прямого выбора	Сформировать список книг, которые не возвращены вовремя.
	Успеваемость группы студентов. Сведения по одному экзамену одного студента: Номер зачетной книжки, Название дисциплины, Дата получения оценки, Оценка, Фамилия преподавателя. (по каждому студенту будет столько записей сколько экзаменов он сдал). При вводе данных в строковые поля предусмотреть преобразование их к формату: первая буква большая, остальные маленькие	Отсортировать в хронологическом порядке по дате получения оценки.	Найти студентов с наибольшим баллом и вывести их фамилии.
	Список экспортируемых товаров. Об отдельном товаре хранятся данные: Наименование товара, Страна импортирующая товар, Количество(в штуках).	Отсортировать список методом Пузырька по Стране	Сформировать массив стран, в которые импортируется указанный товар(название товара вводит пользователь)
	Магазин игрушек. Сведения об игрушке: Название(например: кукла, конструктор и т.д.), стоимость в копейках(вводится может дробное число, содержащее рубли и копейки), возрастные границы детей, для кого игрушка предназначена(два поля – начальный возраст и конечный)	Отсортировать методом улучшенного пузырька по возрастным группам	Сформировать список игрушек для детей указанного возраста и определенной стоимости.
	Служба знакомств. Структура данных хранит сведения о претендентах. Об отдельном претенденте: Фамилия, Имя Отчество, Возраст, Рост, Цвет глаз, Цвет волос, Зарплату, Наличие квартиры, Наличие машины.	Отсортировать список претендентов по возрасту методом прямой вставки.	Сформировать список пар, которые можно построить на основе некоторого критерия. Критерий определите сами
	Продажа квартир. Сведения о продаваемой квартире: Общая площадь, Жилая площадь, Площадь кухни, Наличие лоджии, Наличие санузла и его характеристики(совмещенный или нет), Панельный или кирпичный дом, Этаж, Общее количество этажей, Адрес, Стоимость, Район города	Отсортировать по убыванию методом Пузырька по общей площади и по району	Сформировать список квартир по заданному критерию. Критерий составить самим. Отбор должен осуществляться минимум по трем параметрам.
	Поликлиника. Структура содержит данные о жителях, обслуживаемых данной поликлиникой. О жителе хранятся сведения: Фамилия, Имя, Отчество, Адрес, Место работы, Наличие прививки от гриппа, Дата последней флюорографии	Отсортировать методом прямой вставки по дате флюорографии.	Сформировать список не сделавших прививку от гриппа.
	ГИБДД. Структура хранит данные об автомашинах, О каждой машине: Модель, Номер(код региона, цифровой код, буквенный код), Цвет, Сведения о владельце(Фамилия, Имя, Адрес), дата последнего техосмотра.	Отсортировать по моделям методом бинарной сортировки	Сформировать список номеров машин модели “Волга” не прошедших техосмотр в этом году.
	Справочник владельца видеотеки. О каждом видеофильме хранятся данные: Название, Студия, Жанр, Год выпуска, Режиссер, Исполнители главных ролей(не более 10): фамилия.	Отсортировать по возрастанию методом прямого выбора по жанру.	Сформировать список видеофильмов данного режиссера, за данный год и указанного жанра
	Справочник фаната. Содержит данные о спортсменах: Анкетные и антропологические данные, Гражданство, Вид спорта, Клуб, Данные о личном рекорде(дата, призовое место)	Отсортировать по призовому месту методом улучшенного пузырька.	Сформировать список спортсменов различных стран, по одному виду спорта, принадлежащих одному клубу
	Справочник коммерческих банков. Об отдельном банке хранятся данные: Наименование, Адрес, Статус(форма собственности), условия хранения средств на личном счету(годовые проценты на различных видах вкладов)	Отсортировать в порядке убывания по годовым процентам методом прямого выбора.	Выбрать банк с наибольшим процентом для заданного вида вклада
	Автосалон. Об отдельном автомобиле: Марка, Год выпуска, Мощность двигателя, Количество цилиндров, Запрашиваемая цена. Сведения о покупателях: контактный телефон, Марка, Технические характеристики, Финансовые возможности.	Отсортировать по марке и году выпуска методом Пузырька	Выполнить подбор вариантов для покупателя (подбор по всем поля покупателя, кроме контактного телефона)
	Справочник туриста. Турагенство предлагает услуги: Страна, Город, Условия проживания(Отель-звезды, Автобус и т. д.), Условия проезда, Экскурсионное обслуживание, Сервис принимающей стороны, Стоимость путевки.	Выполнить сортировку методом прямой вставки по стране и стоимости	Сформировать список туров по стране и стоимости