Давайте решим задачу, определив, сколько раз в введенной строке появляется группа букв "ого". Для этого мы можем воспользоваться языком программирования Паскаль и его стандартными функциями. Пошагово рассмотрим, как это сделать.
Шаг 1: Ввод строки
Сначала необходимо получить строку от пользователя. В Паскале это делается с помощью процедуры ReadLn.
Шаг 2: Определение количества вхождений
Чтобы посчитать, сколько раз "ого" встречается в строке, мы можем использовать цикл, который будет проверять каждую подстроку длиной 2 символа.
Шаг 3: Пример кода
Вот простой пример кода на Паскале:
program CountOccurrences;
var
inputString: string;
targetSubstring: string;
count: integer;
i: integer;
begin
// Шаг 1: Получение строки от пользователя
Write('Введите строку: ');
ReadLn(inputString);
// Определяем искомую подстроку
targetSubstring := 'ого';
count := 0;
// Шаг 2: Подсчет вхождений
for i := 1 to Length(inputString) - Length(targetSubstring) + 1 do
begin
if Copy(inputString, i, Length(targetSubstring)) = targetSubstring then
Inc(count); // Увеличиваем счетчик, если нашли подстроку
end;
// Вывод результата
WriteLn('Подстрока "', targetSubstring, '" встречается ', count, ' раз(а) в строке.');
end.
Пояснения к коду:
Объявление переменных:
inputString: строка, которую вводит пользователь.targetSubstring: искомая подстрока, в данном случае "ого".count: счетчик, который будет хранить количество вхождений подстроки.i: счетчик для цикла.
Ввод строки:
- Используем
Write для запроса у пользователя и ReadLn для считывания введенной строки.
Цикл для подсчета:
- Цикл
for проходит от 1 до Length(inputString) - Length(targetSubstring) + 1, чтобы не выйти за пределы строки.
Copy — стандартная функция, которая извлекает подстроку из inputString начиная с позиции i и длиной Length(targetSubstring). Если эта подстрока совпадает с "ого", то счетчик увеличивается на 1 с помощью Inc(count).
Вывод результата:
- С использованием
WriteLn выводится общее количество вхождений подстроки в строку.
Как использовать?
Запустите программу и введите строку, содержащую (или не содержащую) подстроку "ого". Программа затем выведет, сколько раз она встречается.
Этот подход можно адаптировать под любые другие подстроки путем изменения переменной targetSubstring.
