А в чем вопрос собственно? если вопрос что соответствует написанному то это его состояние, т.е. состояние объекта
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
var a:=ArrRandom(12,-12,12); a.Println;
var b:=a.Batch(a.Length div 3).Select(x->x.Reverse);
var k:=0;
foreach var e1 in b do
foreach var e2 in e1 do begin a[k]:=e2; Inc(k) end;
a.Println
end.
<u><em>Тестовое решение:</em></u>
-7 -9 8 -11 -5 -3 -2 6 11 -7 4 -6
-11 8 -9 -7 6 -2 -3 -5 -6 4 -7 11
<em>// PascalABC.NET 3.2, сборка 1437 от 03.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadlnInteger;
Writeln(ReadSeqInteger(n).Where(i->abs(i) mod 10=2).Max)
end.
<u>Пример</u>
18
-11 12 -4 -35 -32 -16 -23 -22 31 -10 2 -29 47 49 42 47 31 -44
42
Все процессы тела.
ТОЛЬКО процессы