Question

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

Answer 1

Нужно вставить оператор - while,паскаль точно не помню,но вроде бы ещё for