проблема с сортировкой вставками

[Brabus]

у меня есть динамический массив челых чисел. я сортирую его при помощи сортировки вставками. но почему-то он не сортирует самый первый элемент
например должно быть так:
4 4 28 34 35 36 41 42 48 53 53 53 60 62 64 68 74 86 90 92
а он сортирует вот так
60 4 4 28 34 35 36 41 42 48 53 53 53 62 64 68 74 86 90 92

код сортировки

for i:=1 to Length(arr)-1 do
  begin
    Temp := Arr[i];
    j:=i-1;
    while (j>0) and (Arr[j]>Temp) do
    begin
      x:=x+1;
      Arr[j + 1]:=Arr[j];
      j := j - 1
    end;
    Arr[j + 1] := Temp;
  end;

помогите пожалуйста найти ошибку.

[p51x]

Надеюсь вы не забыли, что динамические массивы нумеруются с 0...

[Brabus]

ды не забыли... но чтот те получается

[Tatusya]

если задать что j > и = нулю,то вроде всё получается.


while (j>=0) and (Arr[j]>Temp) do

[Brabus]

Tatusya, спасибо вам большое