Дана исходная строка: “12”. Ее обработали по следующему алгоритму: в конец строки дописали ее зеркальную копию, а затем к цифрам стоящим на четных позициях считая слева направо, прибавили по 1. Получилась строка: “1322”. Указанный алгоритм обработки применили к этой получившейся строке, затем к строке, которая получилась в результате новой обработки и т.д. Например, после трех применений алгоритма обработки получились следующие строки:

12

1322

14232332

1524243324333342

Посчитай количество нечетных цифр в строке, получившейся после шестого применения алгоритма обработки. В ответе укажите целое число.

Program test;var i,n,k,s1,es,al:integer;s:string;beginwrite('Введите кол-во повторений:');readln(n);write('Введите строку:');readln(s);repeatinc(k);for i:=length(s) downto 1 do s:=s+s[i];for i:=1 to length(s) doif i mod 2 = 0 thenbegines:=strtoInt(s[i])+1;delete(s,i,1);insert(InttoStr(es),s,i);end;writeln(k,') ',s);until k=n;for i:=1 to length(s) doif StrtoInt(s[i]) mod 2 = 1 then inc(al);writeln('Кол-во нечетных чисел: ',al);end.