Какой оператор необходимо вставить вместо многоточия, чтобы программа считывала, сколько раз подстрока "12" встречается в строке s? Введите ответ без пробелов. c : = 0; repeat if p < > 0 then begin c : = c + 1; delete ( s, 1, p+1) end; until p
Сквозь_Космос
Многоточие в данном случае необходимо заменить оператором "pos". Вот измененный фрагмент кода:
c := 0;
repeat
p := pos("12", s);
if p <> 0 then
begin
c := c + 1;
delete(s, 1, p + 1);
end;
until p = 0;
Обоснование ответа: Оператор "pos" возвращает позицию первого вхождения подстроки "12" в строке "s". В данном коде, после каждого успешного нахождения подстроки "12" в строке, мы увеличиваем счетчик "c" на 1 и удаляем найденную подстроку из строки "s". Этот процесс будет повторяться до тех пор, пока подстрока "12" будет находиться в строке "s". После того, как подстрока "12" не будет найдена, цикл завершится и в переменной "c" будет содержаться количество вхождений подстроки "12" в исходной строке.
c := 0;
repeat
p := pos("12", s);
if p <> 0 then
begin
c := c + 1;
delete(s, 1, p + 1);
end;
until p = 0;
Обоснование ответа: Оператор "pos" возвращает позицию первого вхождения подстроки "12" в строке "s". В данном коде, после каждого успешного нахождения подстроки "12" в строке, мы увеличиваем счетчик "c" на 1 и удаляем найденную подстроку из строки "s". Этот процесс будет повторяться до тех пор, пока подстрока "12" будет находиться в строке "s". После того, как подстрока "12" не будет найдена, цикл завершится и в переменной "c" будет содержаться количество вхождений подстроки "12" в исходной строке.
Знаешь ответ?