Var rec, beg, endd, current : pnt;

Создается однонаправленный список записей.

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

20. Выяснить, имеется ли пассажир, багаж которого превышает багаж каждого из остальных пассажиров и по числу вещей, и по весу. Исходный файл и результат распечатать.

21. Дать сведения о багаже, число вещей в котором не меньше, чем в любом другом багаже, а вес вещей не больше, чем в любом другом багаже с этим же числом вещей. Исходный файл и результат распечатать.

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

type NT=^B;

B = record Книга

M: string[25]; Ф.И.О. автора

N: string [60]; Название

W: integer; Год издания

next: NT;

end;

var rec, beg, endd, current : NT;

Создать однонаправленный список записей.

Найти авторов, издавших более одной книги, начиная с 1980 года. Распечатать исходный файл и результаты созданного списка.

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

type PT=^S;

S = record Ученик

N: string [30]; Фамилия ученика

C: 1..10; Год обучения

L: string[10]; индекс группы

next: PT;

end;

var rec, beg, endd, current : PT;

Создать однонаправленный список записей.

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

Лабораторная работа №7

Объектно-ориентированное программирование

Цель работы – овладение практическими приемами и навыками разработки и создания программ посредством иерархически связанных классов.

1. Теоретическая часть

1.1. Введение

Объектно-ориентированное программирование (ООП) - это результат естественной эволюции более ранних методологий программирования. Оно более структурировано и более модульно и абстрактно, чем традиционное программирование. Потребность в ООП связана со стремительным усложнением приложений и отсюда как следствие недостаточной надежностью программ и выразительными способностями языков программирования.

ООП - это моделирование объектов посредством иерархически связанных классов. Малозначащие детали объекта скрыты от нас, и если мы даем команду, например, переместить объект, то он "знает", как он это делает. Переход от традиционного программирования к ООП на начальном этапе характерен тем, что под объектами в программе подразумеваются конкретные физические объекты. В этом случае легче дается понимание различных действий над ними. В качестве примера выберем простые графические фигуры, поскольку каждая фигура представляет реальный объект на экране. Его всегда можно отобразить и тем самым проверить моделируемые действия над объектом в явном виде. После того как определены простейшие графические объекты, достаточно легко можно формировать более сложные на основе уже имеющихся. В ООП такому сложному графическому объекту соответствует список примитивных объектов, к которому применимы все те же действия, что и к составляющим его элементам: отображение, стирание с экрана, перемещение в заданном направлении.

ООП опирается на три основных понятия:

• инкапсуляция;

• наследование;

• полиморфизм.