Поменять местами переднюю и заднюю части массива с чётным количеством элементов for i := 1 to n do
Obmen2(A, 2*n, i, i+n,);

demon998    1   04.02.2021 15:10    2