Question

Программа должна считать, сколько раз в строке S встречается цифра '0'. Какой оператор надо вставить вместо многоточия? Вводите ответ без пробелов.
c := 0;
for k:=1 to Length(S) do begin
if S[k] = '0'
then ...
end;

Answer 1

c:= c + 1 - c выстыпет в роли счетчика