восполнил пробелы в вариантами предлагаемым В выпадающих списках жанр Сказки о царе берендее литературная сказка поскольку у неёЧто такое графические редакторы Какова его функция ​

gcgxvchпнчгщчолмщж телевизионном итд оры во до сил бис ах за то дзот по та во Ом про ли по ли род ли род за во шт род лтд доходил по ряд Эвелла флаг

program xxx;

  var i, k, c, e : integer

begin

  k: =0;

  for i: =100 to 999 do

      begin

          c: = i div 100;

          e: =i mod 10;

          if c = e then k: =k+1

    end;

  writeln('кол-во палиндромов =', k);

  readln

end.

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.