Двумерный массив

[Ilai]

Добрый день!
Помогите пожалуйста написать программу. Дали задание: Сформировать квадратную матрицу порядка n(n=8), в которой упорядочить строки по не убыванию их первых элементов.. Язык Free Pascal. Помогите пожалуйста!

[min@y™]

Помогите пожалуйста!

Написать за тебя штоли?

[Stilet]

Ну ввод матрицы я делать не буду, надеюсь сам разберешься.
А вот сортировку пожалуйста:

for i:=Low(a) to High(a) do begin
 for j:=Low(a) to High(a) do begin
  if a[i,Low(a[i])]<a[j,Low(a[j])] then begin
   for k:=Low(a[i]) to High(a[i]) do begin
     v:=a[i,Low(a[i])]; a[i,Low(a[i])]:=a[j,Low(a[j])]; a[j,Low(a[j])]:=v;
   end;
  end;
 end;
end;

i,j,k - Целые v - такого же типа как и элемент матрицы.
Идея ясна?

[Ilai]

Сообщение от Stilet

Ну ввод матрицы я делать не буду, надеюсь сам разберешься.
А вот сортировку пожалуйста:

for i:=Low(a) to High(a) do begin
 for j:=Low(a) to High(a) do begin
  if a[i,Low(a[i])]<a[j,Low(a[j])] then begin
   for k:=Low(a[i]) to High(a[i]) do begin
     v:=a[i,Low(a[i])]; a[i,Low(a[i])]:=a[j,Low(a[j])]; a[j,Low(a[j])]:=v;
   end;
  end;
 end;
end;

i,j,k - Целые v - такого же типа как и элемент матрицы.
Идея ясна?

Да, думаю разберусь. По крайней мере постараюсь. Спасибо Вам!