Основы программирования на языке Паскаль

Ord(X) - порядковый номер значения переменной X в списке идентификаторов.
Succ(X) - следующее значение для величины Х.
Pred(X) - предыдущее значение данного типа.
Обратите внимание на то, что для функции Ord нумерация среди значений идет, начиная от нуля. Для последнего значения нельзя применять функцию Succ, для первого - Pred.
Переменные различных перечисляемых типов несовместимы друг с другом.
Множество стандартных порядковых типов в языке Паскаль на самом деле определены как перечисляемые. Это типы Char, Integer, другие. Достоинства стандартных порядковых типов лишь в том, что над каждым из них уже определены специфические действия. Например, тип Boolean описан так:
Type
Boolean = (False, True);
Единственное его отличие от перечисляемых типов, определяемых программистом, состоит в том, что значения типа Boolean можно выводить на экран. Можете проверить, Ord(False)=0.
Интересно, что переменная перечисляемого типа может быть счетчиком в цикле "с параметром".
Пример:
Program T1;
Type
Colors = (Black, Blue, Green, Cyan, Red, Magenta, Brown, Yellow, White);
Var
C1,C2 : Colors;
Begin
C1:=Green;
C2:=Red;
Writeln(Ord(C1), Ord(Succ(C2)))
End.
Во время выполнения на экране появятся числа "2" и "5", что соответствует номерам значений Green и Magenta.
Следующий тип, который можно определить в программе - тип-диапазон.
Здесь не нужно перечислять все значения этого типа, потому, что возможными для него являются значения поддиапазона уже определенного до него любого порядкового типа (стандартного или описанного ранее перечисляемого типа). Достаточно лишь указать начальную и конечную величину отрезка порядкового типа. Единственное условие: начальное значение не должно превышать конечное.
Формат описания отрезочного типа:
Type
<Имя типа>=<Нач.>..<Кон.>;
Примеры:
Type
Age=0..150; {Целое число в интервале от 0 до 150}
Lat='A'.. 'Z'; {Заглавные буквы латинского алфавита}
Month=(January, February, March, April, May, June, July, August, September, October, November, December);
Spring=March..May; {Весенние месяцы}
Есть еще одна возможность определить новый тип, о существовании которой можно было бы и догадаться.