Установите верный порядок следования команд в программе при сортировке массива из 10 элементов в порядке неубывания.

• var
• for i := 1 to 9 do
  begin
• i, j, m, x: Integer;
  begin
• m := i;
• for j := i + 1 to 10 do
  begin
• if A
  \[j\]
  < A
  \[m\]
  then
• m := j;
  end;
• x := A
  \[i\]
  ;
• A
  \[i\]
  := A
  \[m\]
  ;
• A
  \[m\]
  := x;
• end;
  end;