Пользовательский тип данных задается непосредственно перечислением всех значений, которые может принимать переменная данного типа. Отдельные значения указываются через запятую, а весь список заключается в круглые скобки.
Формат:
Туре
<имя типа> = (<значение1,значение2>);
Var
<идентификатор> : <имя типа>;
Пример:
Type
GAZ = (C,O,N,F);
Metal = (Fe,Co,Na,Ca,Zn);
Var
C1,C2,C3:GAZ;
M1,M2 : Metal;
Season : (winter, spring, summer, autumn);
В данном примере приведены два явно описанных типа данных пользователя – это газ и металл. Переменные С1,С2 … могут принимать только одно из перечисленных значений. Третий тип перечисления анонимный и задается перечислением значений в разделе Var. Season является переменной этого типа и может принимать значения (winter, spring, summer, autumn). Имена внутри круглых скобок являются константами соответственного типа перечисления и соответствуют обычным переменным для констант. |