Суть метода состоит в том, что бы в исходном массиве найти наименьший элемент, а затем поменять местами первый элемент в списке с найденным. После того, находиться наименьший их оставшихся и меняется со вторым элементом. И так до тех пор пока весь список не будет отсортирован.
for i:=1 to n-1 do begin
min:=a[i]; k:=i;
for j:=i+1 to n do
if a[j]<min then begin
min:=a[j];
k:=j
end;
a[k]:=a[i];
a[i]:=min;
end;