В системе данных языка Pascal тип объединение как таковой
отсутствует. Однако, начиная с 5-ой версии, в нем декларированы
вариантные записи, которые реализованы как размеченные объединения.
Появилась метка (переменная), которая хранит тип варианта поля записи.
Когда метка
принимает конкретное значение, выбирается тот или иной
вариант:
type
rec2 = record
с : longint;
Case
aaa byte of
1 : (d : word);
2 : (e : single)
end.
Варианты оформляются конструкцией Case … of и примечательны тем,
что память под них отводится одна и та же (как в объединениях).
Наличие вариантных записей в Pascal
позволило обойти отсутствие
блоков в Pascal (напомним, что блок позволяет объявлять новые переменные
в теле программы).
Program ААА;
type
rec : record;
c : longint;
case k : byte of
1: (d : word);
2: (е : record);
case s : integer of
3 : (f : int);
5 : (g : real);
c
Aaa
e