informatyki i systemów mikroprocesorowych

   Sortowanie przez wstawianie polega na pobieraniu kolejnych elementów ciągu i poszukaniu dla niego odpowiedniego miejsca na liście elementów uporządkowanych. Gdy miejsce zostanie znalezione, to elementy ww. listy się rozsuwa i w tak ustalone miejsce wkłada element.

Założenie: ciąg liczb do sortowania: 4,1,6,3

Realizacja:
    4 1 6 | 3 - element ostatni jest początkiem listy uporządkowanej

    wybiera się element leżący tuż przed elementem ostatnim (liczba 6) i porównuje się

    z elementem listy (3)

    element 6>3 zatem   
    4 1 | 3 6

    wybiera się następny element (1), i porównuje z elementami listy oraz odpowiednio

    "wkłada"   
    4 | 1 3 3    itd.

Przykładowa realizacja ww. algorytmu w języku Turbo Pascal:

program sortowanie_przez_wstawianie;
uses crt;
const n=10;
var
  tab:array[1..n] of integer;
  i,j,k : integer;
begin
  clrscr;
  writeln('Sortowanie przez wstawianie');
  for i:= 1 to n do readln(tab[i]);
  writeln('Liczby przed sortowaniem:');
  for i:= 1 to n do write(tab[i]);
  for j:=n-1 downto 1 do
  begin
    k := tab[j];
    i := j + 1;
    while (i<=n) and (k>tab[i]) do
    begin
      tab[i-1]:=tab[i];
      i:=i+1;
    end;
    tab[i-1]:=k;
  end;
  writeln('Liczby po sortowaniu:');
  for i:=1 to n do write(tab[i]);
  repeat until keypressed;
end.