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

Question

Дмитрий Зотов

Информатика

5 декабря, 00:23

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

+1

Ответы (1)

Знаешь ответ на этот вопрос?

Doki · Answer 1

program zz1;

var s, s1:string; / / задаем переменные строкового типа

i, k, x, g:integer; / / задаем переменные целого типа

begin

s:='12'; / / задаем исходную строку

for k:=1 to 6 do

begin

s1:=s;

for i:=length (s) downto 1 do

s1:=s1 + copy (s, i, 1);

for i:=1 to length (s1) do

if i mod 2 = 0 then s1[i]:=chr (ord (s1[i]) + 1);

s:=s1;

end;

for i:=1 to length (s1) do

begin

g:=strtoint (s1[i]);

if g mod 2 = 1 then x:=x + 1;

end;

writeln (' количество нечетных цифр в строке, получившейся после шестого применения алгоритма обработки = ', x);

end.