Сортировка массивов слов по возрастанию их длин

[felixXx]

Помогите пожалуйста!
Даны две таблицы из N слов различной длины. Упорядочите слова по возрастанию их длин.
Реализовать пока не получилось

[fbus]

какой язык?

[felixXx]

Delphi конешно...
{можно и в паскале если уже есть готовое - разберусь кароче... %) }


флудить и донимать не буду - надеюсь и жду... %)

[psycho-coder]

var
  i, k: Integer;
  tmp: String;
begin
for i := 0 to High(mas) do
  for k := 0 to High(mas) do
    if Length(mas[k]) < Length(mas[i]) then
    begin
      tmp := mas[i];
      mas[i] := mas[k];
      mas[k] := tmp;
    end;
end;

Код не проверял, писал сюда.

[felixXx]

Огромное спасибо! Сегодня узнаем верно или нет =)