7 10

С помощью форматирования можно располагать выводи­мые данные в столбцах, строить на экране дисплея таблицы.

Копирование строки или ее части. Функция копирования называется также «вырезкой». Она позволяет скопировать од­ну область памяти в другую. Для копирования необходимо указать строковое выражение, из значения которого выделяет­ся часть, а также начальный номер символа и количество символов копируемой части:

copy (строковое выражение, начальный номер символа, ко­личество символов)

Например, результатом работы функции

copy (‘информатика’, 3, 5)

будет слово ‘форма’.

Применим данную функцию для разработки второй версии программы обращения слова. Будем обрабатывать слово, вы­деляя из него буквы и присоединяя к результату слева. Пере­менной у, содержащей результат, сначала присваивается зна­чение пустой строки. Переменная цикла изменяет свои значе­ния от 1 (первого символа слова) до длины вводимой строки (номера последнего символа слова).

program Р30;

var x, у: string [10 ]; i: integer;

begin

write (‘введите слово’);

readln(x);

y: = "; {присваивание результату начального значения —пустого слова}

for i: = 1 to length (x) do

у: = copy (x, i, 1) + у; {присоединение копируемой буквы слева}

writeln;

write (у)

end.

Поиск подстроки в строке. Функция поиска определяет, с какой позиции (номера символа) одна строка (подстрока) со­держится в другой (данной строке). Если такое вхождение под­строки в строку имеет место, то результат работы функции — номер символа в исходной строке, с которого начинается под­строка. Если вхождения нет, то результат — нуль. Аргументы функции могут быть строковыми выражениями.

роs (подстрока, исходная строка)

Вставка в строку. В одну строку можно вставить другую строку, указав номер символа, начиная с которого осуществ­ляется вставка. Входные данные процедуры — вставляемая строка, исходная строка и целочисленное выражение, задаю­щее позицию вставки. Строки также могут быть заданы стро­ковыми выражениями. Результат работы процедуры помеща­ется в исходную строку, строка при этом «расширяется». Если длина вставки совместно с длиной исходной строки превыша­ет допустимую длину исходной строки, то вставка укорачива­ется справа до допустимой длины.

insert (вставляемая строка, исходная строка, целочисленное выражение);

Удаление части строки. Часть строки можно удалить, стро­ка при этом «сжимается». Для удаления необходимо указать строку (в виде строкового выражения), начальный номер уда­ляемой части строки, количество удаляемых символов. Про­цедура удаления вызывается следующим образом:

delete (строка, начальный номер, количество символов);

Рассмотрим пример замены буквы в слове. Сделаем из сло­ва «форма» слово «фирма».

program Р31;

var x: string [10];

begin

x: = ‘форма’;

insert (‘и’, x, 2); {вставка буквы «и», получилось слово «фиорма»}

delete (x, 3, 1); {удаление третьей буквы — буквы «о»}

write (x)

end.

Методические указания по работе и задания

№	Условие задачи
1	Удалить из строки заданное слово.
2	Дана строка символов до точки. Подсчитать сколько слов содержит данная строка.
3	Дана строка символов до точки. Определить длину самого длинного и самого короткого слова в ней.
4	Дана строка символов до точки. Определить, сколько слов начинается и кончается одной и той же буквой.
5	Определить сколько слов содержит хотя бы одну букву «а» в заданной строке.
6	Определить является ли введенная строка правильным скобочным выражением (рассматривать только круглые скобки)
7	Вывести на экран задом наперед данную строку символов.
8	Определить, является ли заданное слово симметричным.
9	Подсчитать количество слов в строке заканчивающейся точкой.
10	Определите, являет­ся ли данное слово палиндромом («перевертышем», например, «казак», «потоп», «кок» и т. д.).
11	Дана строка с несколькими запятыми. Получите слово между первой и второй запятыми. Решите задачу с применением масси­ва символов и строки символов.
12	Из данной символьной строки выбрать все цифры и сформировать другую строку из этих цифр, сохранив их последовательность.
13	Дана строка содержащая произвольный текст. Выяснить чего в нем больше: русских букв или цифр.
14	Составьте программу циклической перестановки букв слова Х..
15	Составить программу, которая выбирает и печатает сначала все гласные буквы слова, затем все согласные буквы.
16	Удалить из строки заданное слово.
17	Дана строка символов до точки. Подсчитать сколько слов содержит данная строка.
18	Дана строка символов до точки. Определить длину самого длинного и самого короткого слова в ней.
19	Дана строка символов до точки. Определить, сколько слов начинается и кончается одной и той же буквой.
20	Определите, являет­ся ли данное слово палиндромом («перевертышем», например, «казак», «потоп», «кок» и т. д.).
21	Дана строка с несколькими запятыми. Получите слово между первой и второй запятыми. Решите задачу с применением масси­ва символов и строки символов.
22	Дана строка содержащая произвольный текст. Выяснить чего в нем больше: русских букв или цифр.