Символьные переменные и действия с ними

Операции в Pascal могут производиться не только над различными по характеру числами, но и над иными объектами. Такими объектами могут быть массивы, файлы, отдельные записи, их совокупности, ограниченные множества, перечисления и прочие логически связанные элементы.

Рассмотрим далее особые типы переменных - Char и String.

Переменные типа Char описывают отдельные символы кодовой таблицы ASCII (всего 256 символов). С этими переменными могут быть использованы функции Ord(a), Chr(x), UpCase(a).

Если аргументом функции Ord является какой-либо символ, то в результате операции присваивания t:= Ord(a); целочисленная переменная t получит значение, равное её числовому коду в системе ASCII. При выполнении присваивания a:= Chr(x), a окажется символом, соответствующим коду x (при передаче параметра x, если он не Byte типа, то - преобразуется в него). Функция UpCase(a) при наличии в параметре a прописных символов преобразует их в заглавные, остальные же символы выдаст без изменения. UpCase применима лишь для преобразования символов латинского алфавита. Все эти особенности изложены в двух программах, приводимых далее:

Пример:

Program Cas1; {Выяснить, является ли введённый символ буквой латинского алфавита}

Var

c: Char;

Begin

Write (’Введите символ ’); ReadLn (c);

{Функция UpCase(x) вычисляет переменную в верхнем регистре }

Case UpCase ( c ) of

’A’,’E’,’I,’O’,’U’: WriteLn (’Это гласная буква латинского алфавита’);

’A’..’Z’: WriteLn (’Это буква латинского алфавита’);

Else WriteL n(’Это не буква латинского алфавита’)

End;