Объясните, как работает структуризация чисел массива по возрастаниюfor i:= 1 to n dofor j:=i+1 to n doif a[j]<a[i] then beginp:=a[i];a[i]:=a[j];a[j]:=p;

//исправленный кусок кода
for i:=1 to n-1 do
  for j:=i+1 to n do
    //обмен ячеек массива местами
    if (a[j]<a[i]) then begin
      p:=a[i];
      a[i]:=a[j];
      a[j]:=p;
     end;
{
начальный массив
21 34 56 01

34<21? no
56<21? no
01<21? yes

(01) 34 56 (21)
обмен ячеек значениями

56<34? no
21<34? yes

01 (21) 56 (34)

34<56? yes

01 21 34 56

}