Для работы с группой различных по типу данных, в системе программирования Turbo

Для работы с группой различных по

типу данных, в системе программирования Turbo Pascal применяют тип данных "запись". 

Записи

в этой ведомости состоит из
отдельных элементов - данных разного типа:

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

Запись в целом и отдельные её элементы (поля) обозначаются именами.

Введём например следующие обозначения: Vladel - имя всей записи; N - порядковый номер; NAME - фамилия И.О.; Ident – марка автомобиля.

уточнённого (составного) имени. Уточнённое имя содержит Имя записи

и Имя элемента и записывается в следующем виде: <имя записи>.<имя поля записи>

в разделе объявления переменных VAR или с использованием раздела объявления

типов пользователя TYPE.

VAR <имя записи>: RECORD
<имя поля 1>: тип;
<имя поля 2>: тип;
. . .
<имя поля n>: тип
END;

RECORD

<имя поля 1>: тип;
<имя поля 2>: тип;
. . .
<имя поля n>: тип
END;
VAR
<имя записи>: <имя типа>;

NAME: String[25];

IDENT: String[15];
END;

TYPE VLADEL = record
N: Integer; NAME: String[25]; RB: String[15];
END;
VAR
R1, R2: VLADEL;

Объявление записи

элементом (полем) записи можно выполнять действия, допустимые для данных его

типа.
Например:
R1.N := 2;
R2.Name := 'Сидоров П.П.'; 

отдельным её элементам, допускается только в операторе присваивания. При этом

слева и справа от знака присваивания должны использоваться имена записей одинакового типа.
R1 := R2;

Обращение к

. элементам (полям) записи происходит с помощью уточнённого имени. Оператор присоединения позволяет упростить обращение к элементу (полю) записи. Имя записи выносится в заголовок оператора присоединения, а в блоке используются только имена элементов записи.

 

WITH <имя записи> DO
Begin
{операторы, содержащие
только имена элементов записи}
End;

оператора
присоединения

Общая форма

 

Например, для рассмотренной выше записи (списка учащихся) оператор присоединения может выглядеть так:

WITH R_EX1 DO
Begin
Write('Введите номер записи '); Readln(N);
Write('Введите Фамилию И.О. ') Readln(Name);
End;

помощью зарезервированного слова
case

данных, которые имеют одну большую общую часть, /

и небольшие части, различные в разных структурах.

треугольника – две
стороны и угол между ними,
для окружности

– её радиус.

Общей частью являются координаты текущей точки x,y.

{переменная типа запись} x: real;

{текущая координата x} y: real; {текущая координата y} Case Fig: (Square, Triangle, Circle) of {вариантная часть} Square: (side: real); {квадрат} Triangle: (s1, s2, angle: real); {треугольник} Circle: (Radius: real); {окружность} END;

{переменная типа запись} x: real;

{текущая координата x} y: real; {текущая координата y} Case Fig: (Square, Triangle, Circle) of {вариантная часть} Square: (side: real); {квадрат} Triangle: (s1, s2, angle: real); {треугольник} Circle: (Radius: real); {окружность} END;

Вариантная часть может быть только одна и должна располагаться в конце записи. Начинается она служебным словом case, за которым следует переменная выбора варианта.

{переменная типа запись} x: real;

{текущая координата x} y: real; {текущая координата y} Case Fig: (Square, Triangle, Circle) of {вариантная часть} Square: (side: real); {квадрат} Triangle: (s1, s2, angle: real); {треугольник} Circle: (Radius: real); {окружность} END;

За каждым возможным значением этой переменной через двоеточие в круглых скобках записываются поля данного варианта записи с указанием их типов. Круглые скобки необходимы, если даже для данного варианта записи поля отсутствуют.