$ ConstantDeclaration = CONST ConstEntry { ConstEntry }
$ ConstEntry = ident "=" ConstExpression ";"
$ ConstExpression = Expression
Описание константы ставит в соответствие идентификатору значение константы.
Выражение константы должно быть определено таким образом, чтобы оно могло вычисляться на этапе синтаксического разбора выражения. В выражении могут использоваться либо константы, либо идентификаторы уже определенных ранее констант.
Sub ConstSample;
Const
// Описание констант с различными вариантами
// установки их значений
c1 = 1;
c2 = 'A';
c3 = "aHaHa";
c4 = 6.66;
c5 = 1 + 2 * 3 - 4;
c6 = 'A' + 'B' + 'C' + #48;
c7 = "aHaHa" + 'Z' + #48;
c8 = 6.66 / 2.22;
c9 = c1 + c4 * c8 - c5;
c10 = c2 + c3 + c6 + c7;
Begin
// Тело программы
End Sub ConstSample;
См. также: