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

Тщцтпщ2опщ2тащ3щ

Объяснение:

Тсжустщ3опщ3оа

program xxx;

var n, c, d, e, k : integer;

begin

  wtite ('введите 3-х значное число n =');

  readln (n);

  c : = n div 100;

  d : = (n div 10) mod 10;

  e : = n mod 10;

  k: = 100*e + 10*d + c;

  if n = k then write ('палиндром') else write('не палиндром')

end.

11000 (2) = 30 (8) = 18 (16) = 24 (10)

100111 (2) = 47 (8) = 27 (16) = 39 (10)

10100011 (2) = 243 (8) = а3 (16) = 163 (10)

101010101010 (2) = 5252 (8) = (16) = 2730 (10)