В программе описан одномерный целочисленный массив A с индексами от 0 до 10. Ниже представлен фрагмент этой программы, в котором значения элементов массива сначала задаются, а затем меняются
for i : = 0 to 10 do
A[i] : = i:
for i : = 0 to 5 do begin
A[5-i] : = A[5+i]:
A[2+i] : = A[10-i]:
end.