Сортировка

[Takada_sony]

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

[sllh_111]

такая тема уже была, впредь ищи в поисковике этого форума.
это тут
Мой кабинет Справка Пользователи Календарь Новые сообщения Поиск Навигация Выход
а вот одна из похожих тем:
http://www.programmersforum.ru/showthread.php?t=79305

[Takada_sony]

я искала именно таким способом, не нашло то, что мне нужно, а методом бинарных вставок мне не надо, я даже не знаю что это такое...вот

[sllh_111]

а ну тогда извени не знал.
пропиши условие по понятнее, чёнить придумаю.

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

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

[Takada_sony]

Дана матрица размера N на M. Упорядочить ее строки по возрастанию их наибольших элементов.
Сделать методом пузырька.
И дополнительно создать одномерный массив, в котором будут наибольшие значения из каждой строки.

То,что получилось, но там неправильно

[sllh_111]

В принципе норм. прога, только с кодом ошибка
исправь по этим примерам(только это паскаль, но делфи должно пойти).


Поиск минимального элемента в массиве

var a:array[1..10] of integer;
    min:integer;
    i:integer;
begin
     writeln('введите 10 элементов массива');
     min:=MAXINT;
     for i:=1 to 10 do begin
        readln( a[i] );
        if min>a[i] then min:=a[i];
     end;
  writeln( 'Минимальный элемент массива = ', min );
end.

Поиск максимального элемента в массиве

var a:array[1..10] of integer;
    max:integer;
    i:integer;
begin
     writeln('введите 10 элементов массива');
     max:=-(MAXINT+1);
     for i:=1 to 10 do begin
        readln( a[i] );
        if max<a[i] then max:=a[i];
     end;
     writeln( 'Максимальный элемент массива = ', max );
end.

Сортировка массива "пузырьком" по возрастанию

const n = 10; { количество элементов в массиве }
var a:array[1..n] of integer;
    i,j,x:integer;
begin
     writeln('введите ',n,' элементов массива');
     for i:=1 to n do readln( a[i] );
     for i:=1 to n-1 do begin
         for j:=i+1 to n do begin
           if a[i]>a[j] then begin
              x:=a[i]; a[i]:=a[j]; a[j]:=x;
           end;
         end;
     end;
     writeln('после сортировки:');
     for i:=1 to n do writeln( a[i] );
end.

[Takada_sony]

Спасибо огромное за помощь
P.S. Не удаляйте пока данную тему, пожалуйста.

[Takada_sony]

Вот переделала работу снова, посмотрите пожалуйста, не могу исправить ошибки.
Напоминаю задание: Упорядочить строки по возрастанию их наибольших элементов. Матрица M на N