Цель работы:овладение навыками создания приложений, обрабатывающие данные типа Запись.
Краткие теоретические сведения
Запись(record)– это тип структурированных данных, позволяющий создавать сртуктуры, состоящие из именованных разнотипных элементов данных, обрабатываемых как единое целое. Отдельные элементы записей называются полями. Таким образом тип Запись позволяет объединить элементы данных различных типов в единое целое. Синтаксис объявления записи следующий
Type
<имя типа> = record
<имя поля1> : <тип поля1>;
<имя поля2> : <тип поля2>;
<имя поля3> : <тип поля3>;
...
<имя поляN> : <тип поляN>
end;
Например, в приведенном ниже примере приложения будет объявлен тип данных Запись (record), имя типа "ZAP"
Type
zap=record
nzach: integer;
fio: string[20];
mat,fiz,inf: integer;
srb: extended;
end;
Запись состоит из 6 полей, четыре из которых имеют тип integer,одно-stringи одно – extended.
Далее будет объявлен массив записей, то есть таблица.
Var
MZap:array[1..9] of zap;
Переменные типа Запись могут участвовать в операторах присваивания, но никакие операции над ними выполняться не могут.
Арифметические или другие операции могут выполняться только над отдельными полями записи.
Обращение к значению поля осуществляется с помощью идентификатора переменной и идентификатора поля, разделенных точкой.
Например:
MZap[1].nzach – определяет(выполняет) обращение к полю nzach (номер зачетки) первого элемента массива MZap типа zap.
Пример создания приложения
Задание. Создать Windows-приложение для обработки ведомости об успеваемости студентов группы, в количестве 9 человек. Каждая запись должна содержать номер зачетной книжки, фамилию и инициалы, а также оценки по математике, физике и информатике. Для каждого студента рассчитать средний балл. Вывести ведомость в порядке убывания среднего балла.
В отдельный список вывести информацию о неуспевающих студентах (студентах, получивших хотя бы одну двойку).
В отдельное поле вывести наибольший и наименьший номера зачетных книжек в группе, а так же фамилии студентов, которым они принадлежат.
8.2.1. Указания по созданию приложения
Для нового проекта создайте новую папку, например X:\35эи\ lab8.
Сохраните проект File | Save Project As… (Файл | Сохранить Проект как…).Далее сохраните модуль под именем UnZap, а файл проекта – под именем PrZap.