Сортировка вставками двумерного символьного массива - Turbo Pascal

Формулировка задачи:

Есть двумерный символьный массив, [10,25], содержащий в себе строки с личными данными (условно, ФИО). Нужно эти строки отсортировать по алфавиту вставками (принципиально). Из идей только достаточно идиотская, через еще один массив, но она быстро была отброшена как несостоятельная. Прошу помощи, господа.

Решение задачи: «Сортировка вставками двумерного символьного массива»

Листинг программы

  j:=1; while (j<=25) and (a[m,j]=t[j]) do Inc(j);
  if (j<=25) and (a[m,j]<t[j]) or (j>25) then l:=m+1 else r:=m;

Объяснение кода листинга программы

Переменная j инициализируется значением 1.
Пока значение переменной j меньше или равно 25 и значение a[m,j] равно t[j], увеличиваем значение j на единицу.
Если значение j меньше или равно 25 и значение a[m,j] меньше t[j], или значение j больше 25, то значение l равно m+1.
Если значение j меньше или равно 25 и значение a[m,j] больше t[j], или значение j больше 25, то значение r равно m.