Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Возвращает длину строки S (количество символов в ней). Результат - целый.
var Str: String; L: Integer; {... } Str:='Hello!'; L:=Length(Str); {L = 6}COPY (St,a,b)
Возвращает b символов строки St, начиная с позиции a.
var s, s1, s2: string;begin s:= '123456789'; s1:= Copy (s, 3, 6); {345678} s2:= Copy (s1, 2, 3); {456} end.POS (S1,St)
Возвращает номер позиции, с которой строка S1 входит в строку St. Возвращает ноль, если такой подстроки в исходной строке нет.
var Str1, Str2: String; P: Integer; {... } Str1:='Hi! How do you do?'; Str2:='do'; P:=Pos(Str2, Str1); {P = 9}Упр. 41. ввести строку с клавиатуры и заменить все буквы «а» на буквы «б».
Program zamena;
var s: string;
i: integer;
Begin
writeln('Введите строку');
Readln(s);
{начинаем цикл, в котором будем двигаться по строке и менять буквы:}
for i:=1 to Length(s) do
if s[i] = 'а' then s[i]:= 'б';
Writeln(s);
End.
Домашние вопросы и задачи:
1. Что такое величина типа String? Как описать переменную-строку?
2. Как можно задать строковой переменной значение?
3. Как сравнивать строки. Приведите примеры.
4. Что такое склеивание строк. Приведите пример.
5. Расскажите о строковых функциях. Приведите примеры.
Задачи:
№ 58. Ввести символьную строку и заменить все буквы «а» на буквы «б» и наоборот, как заглавные, так и строчные. Подсчитать количество замен.
Пример: Введите строку: ааббссААББСС
Результат: ббаассББААСС 8 замен
Дата публикования: 2014-10-30; Прочитано: 938 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!