Чему
будут равны элементы этого массива
после выполнения фрагмента программы?
for
i := 0 to 9 do A[i] := 9 — i;for i := 0 to 4 do begin
k := A[i]; A[i] := A[9 — i]; A[9 — i] := k;
end;