Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.09;
Скачать: CL | DM;

Вниз

матрица   Найти похожие ветки 

 
РоманВитов   (2002-11-29 23:06) [0]

дана матрица нужно найти сумму каждой строки и сортировать строки по возрастанию суммы строки


 
Юрий Зотов ©   (2002-11-29 23:27) [1]

ЗАДАЧУ Вы объяснили вполне четко. А в чем же КОНКРЕТНЫЙ вопрос?


 
Victor_Cr ©   (2002-11-29 23:36) [2]

Ну и... проблема в чем? Азы програмонаписательства учат это делать так:

Arr: array [0..n,0..m] of ...;// Объявляем массив в котором
//нулевые элементы резервируем для своих нужд, т.е. все данные
//начинаются с первого индекса.
begin
For i := 1 to m do
For j := 1 to n do
Arr[0,i] := Arr[0,i] + Arr[j,i]; // Находим сумму.
For i := 1 to m-1 do
For j := i+1 to m do
if Arr[0,i] > Arr[0,j] then // сортировка по убыванию
begin
for k := 0 to n do // обмен местами двух строк массива
begin
Arr[k,0] := Arr[k,i];
Arr[k,i] := Arr[k,j];
Arr[k,j] := Arr[k,0];
end;
end;
end;

Может я тут чего-то и напутал. Но вроде это не та проблема с которой нужно обращаться на форум. Я чего-то не понял в вопросе, может все значительно сложнее?



Страницы: 1 вся ветка

Текущий архив: 2002.12.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.039 c
3-27833
Sergey_Elf
2002-11-20 10:10
2002.12.09
добавить поле в таблицу dbf через delphi 5


6-28162
Leviathan
2002-10-13 23:14
2002.12.09
Cookies


1-28060
DDF
2002-11-26 07:02
2002.12.09
Подскажите что делаю не так?


6-28176
Olorin
2002-10-15 10:59
2002.12.09
редиректор с порта на порт...


3-27885
Calm
2002-11-21 13:40
2002.12.09
Использование значения, возвращаемого процедурой