В программе описан одномерный целочисленный массив.

for i:=0 to 10 do
A[i]:= i + 1;
for i:=0 to 10 do
A[i]:= A[10-i] 

Чему будут равны элементы этого массива? 

1)первый цикл, заполнение массива

очевидно что элемент массива равен числу большему индуксу(т.е. индекс=0, элемент=1 и т.д.)

следовательно при первом заполнении массива элементы будут равны: 1 2 3 4 5 6 7 8 9 10 11

2) второй цикл, ну тут хитрость, чисто подбор, сделаю как бы табличку

a[0]:=a[10-0] // на простом, последнее значение массива(это 11) становится первым

a[1]:=a[10-1] // a[9] (Это 10) становится на место a[1], ну и так далее

но, есть одно но, массив станет симетричным при определенном элементе, мне писать всю таблицу лень, поясню на произвольном, почему

a[5]:=a[10-6] // т.е значение шестого элемента массива станет равным значению 4, а в четвертом у нас будет 8 

Всё просто:

после первого цикла значения будут

1

2

3

4

5

6

7

8

9

10

11

После второго цикла:

111098767891011