Главная страница
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.017 c
14-28220
Вадим
2002-11-16 21:00
2002.12.09
Все хорошо! Уже тошнит от этого!


4-28327
Gayrus
2002-10-26 10:42
2002.12.09
Regedit


1-28050
Abelevich
2002-11-27 19:39
2002.12.09
Использование Word в качестве редактора


4-28354
Nikolas SHmuS
2002-10-27 12:36
2002.12.09
NetMessageBufferSend


1-28049
UNI2002
2002-11-30 16:10
2002.12.09
кто знает как это написать