|
|
Константы - множества
Значение типизированной константы-множества задается в виде правильного конструктора множества, например:
type
days = set of 1. .31;
digc = set of ' 0 ' . . ' 9 ' ;
error = set of 1..24;
const
WorkDays : days = [1..5, 8.. 12, 15.. 19, 22.. 26, 29, 30];
EvenDigits: digc = ['0', '2', '4', '6', '8'];
ErrorFlag : error= [] ;
Константы - указатели
Единственным значением типизированной константы-указателя может быть только NIL, например:
const
pr : Real= NIL;
|
|
|
