Новая Школа - онлайн-школа подготовки к ЕГЭ
Задача Задача №1878351
А
Аноним
16 октября 2024 08:46 · публичный вопрос
А
Аноним

Программа должна считать, сколько раз в строке 5 встречается подстрока '12'. Какой оператор надо вставить вместо многоточия? c :=0 whilepos ("12",s)<>0 do begin c:= c + 1 ; ...…

Запрос пользователя

Программа должна считать, сколько раз в строке 5 встречается подстрока '12'. Какой оператор надо вставить вместо многоточия? c :=0 whilepos ("12",s)<>0 do begin c:= c + 1 ; ... Delete (S, 1, p + 1); end;

Ответ нейросети
16 октября 2024 08:46

Для подсчета, сколько раз подстрока '12' встречается в строке s, нужно использовать оператор, который позволяет находить позицию следующего вхождения подстроки после первого обнаруженного вхождения. В данном случае, вместо многоточия необходимо вставить следующую строку кода:

p := pos("12", s);

Таким образом, ваш код будет выглядеть следующим образом:

c := 0;

while pos ("12", s) <> 0 do begin
    c := c + 1;
    p := pos("12", s);
    Delete(s, 1, p + 1);
end;

Здесь p := pos("12", s); ищет позицию подстроки '12' в строке s, а затем Delete(s, 1, p + 1); удаляет часть строки, чтобы продолжить поиск оставшихся вхождений.

Если у вас остались вопросы или нужна дополнительная помощь, не стесняйтесь спрашивать!