Пример выполнения лабораторной работы № 1

ЛАБОРАТОРНАЯ работа № 1

Массивы n-мерные: ввод, вывод, сортировка, поиск. Работа со структурами-записями. Массивы записей

ЦЕЛЬ РАБОТЫ. Создать массив записей (базу данных) в соответствии с заданной структурой варианта. Количество записей не больше 10. Реализовать редактирование записей (изменение, добавление, удаление). Исходные данные должны вводиться с проверкой на область допустимых значений. Все действия пользователя должны контролироваться и снабжаться осмысленными сообщениями. Реализовать в соответствии со своим вариантом запрос и вывод содержимого записи по определенным ключам. Предусмотреть вывод всей базы данных на экран. Вся обработка базы данных должна происходить путем выбора соответствующего пункта из меню.

пример выполнения лабораторной работы № 1

Рассмотрим поэтапное выполнение лабораторной работы № 1 на примере одного из вариантов.

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по номеру записи; по наименованию товара; по стоимости товара; по году поступления товара.

Рис. 1. Структура записи «ТОВАР».

Запросы:

1) Вычислить общее количество товаров за определенный год

Необходимо:

1. Создать массив записей в соответствии с заданной структурой.

2. Предусмотреть вывод всей базы данных на экран

3. Реализовать редактирование записей (изменение, добавление, удаление).

4. Реализовать вывод содержимого записи по следующим ключам:

? по номеру записи;

? по наименованию товара;

? по стоимости товара;

? по году поступления товара.

5. Вычислить общее количество товаров за определенный год (запрос).

Структура записи «ТОВАР»

Начнем с описания структуры. На алгоритмическом языке Pascal структура, изображенная на рис. 1, может быть описана следующим образом:

data= { дата поступления товара }

record

day: byte; {день}

year: word; {год}

month: byte; {месяц}

end;

RecType= {Запись «товар»}

record

naimt: string[LenNaimt]; {наименование товара}

kolt: longint; {количество товара}

stoimt: real; {стоимость товара}

dmg: data; { дата поступления товара }

end;

Не нашли, что искали? Воспользуйтесь поиском: