§ 8. Стандартные процедуры и функции для работы со строковыми величинами

Length(s) даёт длину, LowerCase(s) и UpperCase(s) возвращают строку в нижнем и верхнем регистре. Для отдельного char существуют LowCase и UpCase. Сам вызов функции преобразования не заменяет исходную строку: результат нужно сохранить, например s := UpperCase(s).

Pos(образец, строка) использует позиции с единицы. В «мама» фрагмент «ма» впервые начинается в позиции 1; для «па» результат 0. LastPos ищет последнее вхождение, а PosEx позволяет задать начальную позицию поиска. Методы .NET вроде IndexOf используют другие соглашения: не смешивайте их индексы и значение «не найдено» с Pos.

В Copy(s, i, k) параметр i задаёт начало, k — количество элементов. Для «информатика» Copy(s, 3, 4) даёт «форм»: позиции 3, 4, 5, 6. Последняя включённая позиция равна i + k − 1 при положительном k. Количество элементов и номер последнего элемента — не одно и то же.

В учебных алгоритмах удобно сначала проверять допустимость начала и длины. Для копирования пустого фрагмента количество равно нулю. Если нужны первые три элемента, используйте Copy(s, 1, 3), предварительно учитывая длину исходных данных.

Delete(s, i, k) удаляет k элементов начиная с позиции i. Следующие элементы сдвигаются влево, длина уменьшается. Insert(fragment, s, i) вставляет фрагмент перед элементом i; вставка в позицию Length(s) + 1 добавляет текст в конец. После изменения строки старые позиции могут указывать уже на другие элементы.

В «котик» удаление двух элементов с позиции 4 даёт «кот». Вставка «ле» перед первым элементом строки «то» даёт «лето». В отличие от Copy, эти процедуры не используют как значение справа от присваивания.

var s: string;
begin
  s := 'котик';
  Delete(s, 4, 2);
  Insert('с', s, 1);
  writeln(s);  // скот
end.

Разберём исходную строку ТЕСТИРОВАНИЕ. Её длина 12; шестая буква Р, Copy(s, 5, 8) даёт ИРОВАНИЕ. Их соединение — РИРОВАНИЕ. Delete(s1, 3, 1) превращает её в РИОВАНИЕ. Insert(s[3], s1, 3) вставляет С и даёт РИСОВАНИЕ.

При подсчёте вхождений заранее решите, допускаются ли пересечения. В «banana» образец «ana» начинается в позициях 2 и 4: два пересекающихся вхождения, но только одно при поиске непересекающихся фрагментов. Для образца длины k последние возможные начала идут до Length(s) − k + 1. Пустой образец в таком учебном счётчике лучше запретить явно.