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