Смотри. Смотришь, сколько раз выполняется твое условие. Здесь указано 4. Смотришь на условие. Перемещение по X - 3,-2,1. Складываем - конечное перемещение равно 2. Перемедение по Y - 0,-1,0. Складываем - конечное перемещение равно - 1. Теперь умножаешь это перемещение (2;-1) на 4 т.к дано в условии, получается твой чертежник оказался после команды в точке (8;-4) Вопрос таков - какую команду надо выполнить чтобы ВЕРНУТЬСЯ В ИСХОДНУЮ, значит нужно как бы шагнуть назад, с отрицательным значением -8,4 Ответ :1
Var a:array [1..3,1..5] of integer; i,j,s:integer; begin randomize; for i:=1 to 3 do begin for j:=1 to 5 do begin a[i,j]:=random(21)-10; write (a[i,j]:4); end; writeln; end; for i:=1 to 3 do for j:=1 to 5 do s:=s+a[i,j]; writeln (s); readln; end.