8.2. Операции над символами

Символы можно лишь присваивать и сравнивать друг с другом. При сравнении символов они считаются равными, если равны их ASCII-коды; и один символ больше другого, если имеет больший ASCII-код:

Символы можно лишь присваивать и сравнивать друг с другом. При сравнении символов они считаются равными, если равны их ASCII-коды; и один символ больше другого, если имеет больший ASCII-код:

- 152 -

'R' = 'R'

'r' > 'R' (код 114 > кода 82)

Операции сравнения записываются традиционным способом:

<, <=, =, >=, >, <>.

Каждый символ можно рассматривать как элемент множества Set of Char и применять к нему операцию проверки на включение in:

Var Ch : Char;

. . .

ch := 'a';

if Ch in ['a'..'z'] then . . .

К символьным значениям и переменным могут быть применены также функции, приведенные в табл. 8.1.

Таблица 8.1

Функция : Тип

Назначение

Chr( X : Byte) : Char

Возвращает символ ASCII - кода X

Ord( C:Char) : Byte

Возвращает ASCII — код символа C

Pred( C : Char) : Char

Выдает предшествующий C символ

Succ( C : Char) : Char

Выдает последующий за С символ

UpCase(C : Char) : Char

Переводит символы 'a'..'z' в верхний регистр 'A'..'Z'

Функции Succ и Pred хороши для последовательного перебора символов. Следует только помнить, что не определены значения Succ(#255) и Pred(#0).

Функция UpCase переводит в верхний регистр символы латинского алфавита, возвращая все остальные, в том числе и кириллицу, в исходном виде.