Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10. в ниже фрагменте программы массив сначала заполняется, а потом изменяется: for i: =0 to 10 do a[i]: = i; for i: =1 to 11 do a[i-1]: = a[11-i]; чему будут равны элементы этого массива?

Var
    a: array[0..10] of integer;
    i, n, k: integer;

begin
    for i := 0 to 10 do
        A[i] := i;
    PrintLn(a);
    for i := 1 to 11 do
    begin
        A[i - 1] := A[11 - i];
        PrintLn(a);
    end;
end.

Трасировка второго цикла А
[10,1,2,3,4,5,6,7,8,9,10]
[10,9,2,3,4,5,6,7,8,9,10]
[10,9,8,3,4,5,6,7,8,9,10]
[10,9,8,7,4,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]
[10,9,8,7,6,5,6,7,8,9,10]