Сортування масиву в Delphi 7 по спаданню та введення случайних чисел з допомогою Random

[OlegBodom]

Поможіть написати прогу сортування масиву. Щоб сортувало масив по зростанню та спаданню , ввід був як із клавіатури так і Random.
Приблизно за таким Інтерфейсом. Плиз

[super-leon]

for i:=1 to n do
begin
a[i]:=random(100);
Memo1.Lines.Add(IntToStr(a[i]));
end;

что за метод?

[OlegBodom]

З Memo1 попроще буде а от виводив в StringGrid1 щоб прога брала дані з відти щось не дуже виходить.....

А са метод сотрування масиву Обміном.

[Stilet]

Во-первых: Код оформляем тегом по кнопке #
Во-вторых: Не постите подряд свои посты, лучше редактируйте предидущий если он последний.
Иначе расценю как нарушения и закрою тему.

по спаданню і за допомогою Random вводило числа.

Помоему достаточно поменять знак:

  if a[k] < a[k+1] then