В про­грам­ме опи­сан од­но­мер­ный це­ло­чис­лен­ный мас­сив с ин­дек­са­ми от 0 до 10. В при­ве­ден­ном ниже фраг­мен­те про­грам­мы мас­сив сна­ча­ла за­пол­ня­ет­ся, а потом из­ме­ня­ет­ся:
for i:=0 to 10 do A[10-i]:= i ;
k:= A[9];
for i:=0 to 9 do
A[10-i]:= A[9-i];
A[1]:=k;


Чему будут равны элемента массива?
1) 9 8 7 6 5 4 3 2 1 0 10
2) 10 1 9 8 7 6 5 4 3 2 1
3) 0 10 9 8 7 6 5 4 3 2 1
4) 10 0 9 8 7 6 5 4 3 2 1

for i:=0 to 10 do A[10-i]:= i ; k:= A[9] Из этих двух строк видим, что k = 1.Значит уже можно сделать вывод, что ответ -- 2, т.к. только там A[1] = 1, а именно значение k мы присваиваем A[1]. В принципе этого достаточно, дальше задачу рассматривать нет смысла особо.Если очень хочется можно вручную проделать цикл и убедиться, что A[0] действительно принимает значение 10, A[2] -- 9 и так далее.Впрочем, повторюсь, это уже лишнее.