11. программа должна считать, сколько раз в строке s встречается подстрока '12'. какой оператор надо вставить вместо многоточия? вводите ответ без пробелов. c : = 0; repeat if p < > 0 then begin c : = c + 1; delete ( s, 1, p+1) end; until p = 0;