Множества в программе д.б. описаны одним из двух способов:
- С использованием раздела описания типов:
Type
MN = Set of T;
Var
M1,M2 :NM;
где: Set – множество;
of – из;
MN - имя типа;
T - тип компонент; {базовый тип}
M1, M2 - имя переменной множества;
- Без использования раздела описания типов:
Var M1,M2 : Set of T;
Например:
Type
Letter = Set of ‘A’ . . ’Z’;
Digit = Set of ‘0’ . . ’9’;
Color = Set of (Red, Green, Yellow);
Symbol = Set of #128 . . #255;
Var
ML :Letter;
MD :Digit;
MC :Color;
MS :Symbol;
Константы множественного типа задаются с помощью конструкторов множеств, представляющих список элементов множества записанных через запятую и заключенных в квадратные скобки. В качестве элементов списка м.б. константы, переменные, выражения или тип диапазон того же базового типа.
Например:
[‘A’ . . ‘ B’, CHR(48+Digit)]
[6, 8, 2, 7]
Элементы м.б. повторяющиеся
Переменные множественного типа могут принимать значения, как множества, так и любого подмножества, число которых равно 2N , где N число элементов множества.
Для множества
Var MN : Set of 1`..3;
Переменная MN может принимать 23 = 8 значений:
[1, 2, 3] [1, 2] [1, 3] [ 2, 3] [ 3] [ 2] [1] [ ]
Можно использовать типизированные константы
Type
Digit = Set of ‘0’ . . ’9’;
Const
D: Digit = [1, 5, 7, 0];