<h3>PascalABC.NET 3.4.2, сборка 1826 от 07.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x: int64;
Readln(x);
Format('{0:#0 000 00 0}', x).Println
end.
F=(Not(1) Or 0) And 1 = (0 Or 0) And 1 = 0 And 1 = 0.
R, c = input().split()arr = list() for _ in range(int(r)): arr.append(list(map(int, input().split())))m = max(e for r in arr for e in r) for i, r in enumerate(arr): if m in r: print(i, r.index(m)) break
За одно повторение без Команды1 он смещается на (1+1,3-2) = (2,1)
За 3 повторения он сместится на (2*3, 1*3) = (6,3)
Последняя команда сместит его в (6+3, 3+9) = (9,12)
Чтобы из 9 и 12 за три повторения сделать 0 и 0 ему нужно смещаться на (-3, -4)
Вариант 3