Сортировка мартиц

[Irisa]

Подскажите пожалуйста..... Надо завтра здавать а у меня запарка...Задана матрица размером NxM. Упорядочить ее строки по возрастанию первого элемента. В случае равенства первых элементов выполнять проверку по вторым элементам строки, и т.д.

[p51x]

В чем конкретно проблема? Не можете найти максимум из чисел в массиве?

[Irisa]

нет просто максимум я бы нашла но все не совсем так легко.....Надо отсортировать строчки матриц по первым элементам .....Вот и не совсем представляю как цикл прописывать понимаю что for, а как не понимаю...

[интеграл]

Девушка, попытаюсь вам помочь !

(копирую прямо из моего домашнего задания)
допустим матрица телефонных номеров, мне нужно сортировать по первому индексу

char p[МАХ][60] // МАХ = 50

for (i=0; i < у -1; ++i) // где у может быть количество количество заполненных элементов( у меня не вся матрица была заполненна)
for (k=i+1; k<=y; ++k)

if (strcmp(p[i], p[k]) > 0)
{   /*поменять местами*/
                       strcpy(temp, p[i]);
                        strcpy(p[i], p[k]);
                        strcpy(p[k], temp);
                } 
}

[Irisa]

Большое спасибо хоть мне на Delphi надо но думаю еслт очень постараюсь разберусь....

Эта тема еще актуальна, и думаю таковой будет до завтра.....

[Stilet]

Irisa

Покажи свой код, а я постараюсь дополнить его сортировкой.

[Irisa]

procedure TZadanie12.BitBtn1Click(Sender: TObject);
var i,j:integer;
begin

for i:=1 to m do
for j:=1 to N do
if Length(StringGrid2.Cells[i-1,0])<>0
then a[i,j]:=StrToInt(StringGrid1.Cells[i,j]) //на этой строчке при выполнении программы выкидывает и как я поняла указыкает на системн. ошибку или что то в роде этого
else a[i]:=0;
x:=0;
for i:=0 to m do
for j:=i+1 to n-1 do
if a[k,i]> a[k,j] then
begin //поменять местами
for l:=1 to m do
begin
temp[l]:=a[k,i];
a[k,i]:=a[k,j];
a[k,j]:=temp[l];
end;
Но я уверенна что он не совсем правильныйц просто это все что я придумала....

[LeninNT]

Ошибка выскакивает, потому что Вы обращаетесь к ячейке которая выходит за пределы таблицы