Или элементарная задача из раздела С
Методы сортировки Простые Подсчетом Вставками Выбором Обменом Сложные Метод ШеллаС разделениями Слиянием Пирамидальная
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]
For i:=2 to N do For k:=N downto i do If A[k]