Сортировка матрицы. Pascal

[ene21]

Всем привет. Подскажите пожалуйста ход решения следующей задачи.
"Необходимо, написать программу, которая строит матрицу чисел ( максимально 10 на 10) и упорядочивает каждую строку по возрастанию элементов."
Собственно кусок, с непосредственным заданием исходной матрицы я написал...а как упорядочивать строки я не могу понять. Как простой, одномерный массив отсортировать я знаю, а как отдельно взятую строчку в двумерном???

[fbus]

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

[Stilet]

Как простой, одномерный массив отсортировать я знаю

Покажи, а я подправлю к сортировке по строкам..

[ene21]

Одномерный массив я сортирую пузырьком. Незнаю пригодно ли это к двумерному массиву. Собственно вот код примера одномерки:
пузырек.JPG

[fbus]

это одномерный. а где обещанный кусок двуменого?

[pu4koff]

// r - номер текущей строки
// row_count - количество строк
for r:=1 to row_count do
begin
   // Тут алгоритм сортировки одномерного массива
   // Только элементы будут не a[i], а a[r][i]
   // Например, if (a[r][i] > a[r][j])
   // Это конечно если матрица хранится у вас как: [строка][столбец]
   // Иначе, будет: if (a[i][r] > a[j][r])
end;

[ene21]

Насчет двумерного. Я смог решить лишь части задачи. Тоесть создать матрицу, заполнить ее с клавиатуры и все. А как сортировать - я совсем не знаю. Вообще каким методом сортируются строки? Пузырек например подойдет?
Если нужна часть кода, где задаеться двумерная матрица - то пожалуйста, вот он:
матрица.jpg
Правда у меня окошко больше не растягиваеться...кусочек с вводом количества строк не виден.

[Вавел из ГМТУ]

ene21, при сохранение проекта у Вас должен быть фаил с расширением *.pas
Откройте этот фаил в "Блокноте" и Вы увидите исходный код Вашей программы, который намного удобнее обсуждать, нежели скриншоты.

Эт было вступление.....

Теперь, что касается темы.

Двумерный массив выглядит таким орбразом:

1 6 5 4 1 4
6 3 1 3 5 2
6 8 0 7 3 5
......
3 1 5 7 3 2

Так вот ваша задача отсортировать строки... Лень мне запускать Delphi(а паскаля у меня уже давно нету), такчто я в двух словах.

For x := 1 To [количество строк] Do
Begin
{Тут надо отсортировать строку.
Отличая от сортировки одномерного будет лишь в обращение.
К двумерному массиву нужно обращаться по двум индексам.
Massiv[строка, столбец];
Тобишь при сортировке номер строки будет изменяться внешним циклом}
End;

Фух, здорово если ктото чтото понял.....

[Stilet]

ene21

И что теперь нам твой код ручками набирать? Не судьба была выложить сюда не картинку а текст кода?

[cherr]

Ну вот, что-то вроде этого:

program sortirovka_massiva;
uses crt;
const
 x=5; y=5;
var
 m,n,i:byte;
 buf:integer;
 a:array [1..x,1..y] of integer;
begin
 for m:=1 to x do
  for n:=1 to y do
   begin
    writeln('a[',m,',',n,']: ');
    readln(a[m,n]);
   end;
  writeln; writeln('Entered:');
 for m:=1 to x do
  begin
   for n:=1 to y do
    write(a[m,n], ' ');
   writeln;
  end;
 for m:=1 to x do
  begin
   for i:=1 to (y-1) do
    for n:=i+1 to y do
     begin
      if (a[m,i]>a[m,n]) then
       begin
	    buf:=a[m,n];
	    a[m,n]:=a[m,i];
	    a[m,i]:=buf;
       end;
     end;
  end;
 writeln; writeln('Ready!');
 for m:=1 to x do
  begin
   for n:=1 to y do
    write(a[m,n], ' ');
   writeln;
  end;
 readkey;
end.