Мальчик1=м1 мальчик2=м2
мужык=М
1 шаг
М м1,м2
2 шаг
М,м1 м2
3 шаг
м1 М,м2
4 шаг
м1,м2 М
5 шаг
(пустота) м1,м2,М
5*20=100 минут
Var min, max, x: byte;
begin
max=0;
min:=100;
for x:= 10 to 99 do begin
if (x mod 10)+(x div 10)=7 then begin
writeln (x);
if x>max then max:=x;
if x
Если решать в общем случае, то нужно считать отдельно суммарные смещения других команд, и брать их с обратным знаком.
x = - (-2 + 2) = 0
y = - (-1 + 1) = 0
Однако, тут можно было и не считать, и так видно что смещения компенсируются, поэтому чертёжик и так вернётся к начальной точке, даже если никакой команды 1 не делать.
Но, если уж сказано сделать, то тогда делаем команду с такими вот нулевыми смещениями.
Ответ: Сместиться на (0, 0)