Добавлено 24. Окт, 2009 автор AlexR . Учебник по паскалю
Напомню, как назначать текстовую переменную с помощью раздела «var»:
Var <имя переменной>:string [N];
N – это количество символов в строке (от 1 до 255). По умолчанию, если не указывать N, оно равно 255. Но если известно, что данная строка будет не длиннее, чем N символов, то рекомендуется его указывать. Например: вряд ли найдется имя, состоящее более, чем из 20 букв, поэтому «var name: string [20];».
Существует специальный тип данных, который вмещает в себя только один символ и не более. Данный тип обозначается: «char»:
Var <имя переменной>:char;
Над строками допустимы операции склеивания (+) и сравнения (<, >, = и т.д.).
Для операции сравнения верно следующее:
Цифры (от 0 до 9) < Большие буквы русского алфавита (от А до Я) < Маленькие буквы русского алфавита (от а до я) < Большие буквы английского алфавита (от A до Z) < Маленькие буквы английского алфавита (от a до z).
Причем для цифр верно следующее: 0<1<2<…<8<9,
Для букв русского алфавита: А<Б<…Ю<Я<а<б<…<ю<я,
Для букв английского алфавита: A<B<…<Y<Z<a<b<…<y<z.
Например: ‘ИВАНОВ’ < ‘Иванов’, ‘121′<’125′, ‘125′<’13′.
Допустим, что были созданы в разделе «var» две строковые переменные: A и B. Для них верны следующие операции:
A:=’хол’;
B:=’од’;
C:=A+B;
writeln (C);
На экране после запуска программы появится следующее слово: «холод».
К отдельным символам строки можно обратиться с помощью номеров в квадратных скобках:
B:=C[5]+C[4]+C[3];
writeln (B);
На экране появится слово: «дол».
Copy (<текст>, [N], [M]) – возвращает M символов строки <текст>, начиная с символа под номером N этой строки.
Пример:
writeln (C, 5, 3);
Выведет слово: ‘дол’
Length (<текст>) – определяет длину строки (или количество символов)
Пример:
writeln (length (A));
Выведет цифру: 3.
Chr (<код>) – преобразует код в символ (по таблице ASCII).
Пример:
writeln(chr(70));
Выведет букву: «F»
UpCase (<символ>) и LowCase (<символ>) – функции, которые преобразуют символы в строке из нижнего в верхний регистр и из верхнего в нижний регистр соответственно (т.е. из прописных в заглавные и из заглавных в прописные). Минус данных функций, что они преобразуют только один символ, поэтому для того, чтобы преобразовать всю строку, например, из нижнего регистра в верхний организовывают символ.
Пример
program upc;
var sent: string [6];
i:byte;
begin
sent:='pascal';
for i:=1 to length(sent) do sent[i]:=upcase(sent[i]);
writeln(sent);
end.
Выведется: «PASCAL».
Учебник по Паскалю