Var
s:string;
b:char;
i,n:integer;
begin
writeln('Введите текст');
readln(s);
writeln('Введите символ');
readln(b);
n:=length(s);
for i:=1 to n do
if s[i]=' ' then
s[i]:=b;
writeln(S);
<span>end.</span>
Справочная система запускается с помощью кнопки F1.
Для вычисления используется формула I=log₂N=log₂15≈4
Найдем координаты, в которые переместился Чертежник: суммируем координаты "x" вместе с "x", "y" вместе с "y". При этом, сумму каждой оси умножаем на "4", так как цикл повторяется четыре раза.
x = 4*(2 + (-2) + (-2)) = 4*(-2) = -8.
y = 4*(3 + 1 + (-2)) = 4*2 = 8.
Чтобы Чертежник вернулся в исходную точку, его координаты должны стать (0,0). Для этого полученные значения "x" и "y" умножаем на "-1". Получаем команду "Сместиться на (8,-8)".
Ответ: 4.