Срочно, высокий балл, первому лучший ответПодсчитать сколько раз в текстовой строке S встретится подстрока S1. Пример работы правильной программы:Исходные данныестрока S: четыре черненьких чумазеньких чертенка чертили черными ч...

Срочно, высокий балл, первому лучший ответ Подсчитать сколько раз в текстовой строке S встретится подстрока S1.  Пример работы правильной программы: Исходные данные строка S:  четыре черненьких чумазеньких чертенка чертили черными чернилами чертеж подстрока S1:  черн Ответ: подстрока "черн" в строке "четыре черненьких чумазеньких чертенка чертили черными чернилами чертеж" встречается 3 раз(а). Подправить код, на данный момент при таком раскладе выдает ответ 0.
Гость
Ответ(ы) на вопрос:
Гость
После " for i := 1 to length(s) do" Вставь вот это и проверь: if (s[i] = 'с') then kol:=kol+1; writeln(kol); readln end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы