В программе описан одномерный целочисленный массив.
for i:=0 to 10 do
A[i]:= i + 1;
for i:=10downto 0 do 
A[i]:= A[10-i]
Чему будут равны элементы этого массива?
только подробно

Да, версия PascalABC.NET 3.1

я не понимаю почему i=6, a[6]=7, a6= a(10-6)=a4=5?

Потому что A[i]:= A[10-i]; подставляем i=6 и получаем A[6]:=A[4], а значение A[4] см. выше, оно равно 7

Обычная алгебра

Делаем программу с трассировкой и все хорошо видно.var A:array[0..10] of integer;var i:integer;begin  Writeln('Первый цикл');  for i:=0 to 10 do begin    A[i]:= i + 1;    Writeln('i=',i,', a[',i,']=',a[i])    end;  Write('Массив: '); a.Println;  Writeln('Второй цикл');  for i:=0 to 10 do begin    A[i]:= A[10-i];    Writeln('i=',i,', a[',i,']=',a[i])    end;    Write('Массив: '); a.Printlnend.РезультатПервый циклi=0, a[0]=1i=1, a[1]=2i=2, a[2]=3i=3, a[3]=4i=4, a[4]=5i=5, a[5]=6i=6, a[6]=7i=7, a[7]=8i=8, a[8]=9i=9, a[9]=10i=10, a[10]=11Массив: 1 2 3 4 5 6 7 8 9 10 11Второй циклi=0, a[0]=11i=1, a[1]=10i=2, a[2]=9i=3, a[3]=8i=4, a[4]=7i=5, a[5]=6i=6, a[6]=7i=7, a[7]=8i=8, a[8]=9i=9, a[9]=10i=10, a[10]=11Массив: 11 10 9 8 7 6 7 8 9 10 11