Помогите пожалуйста отсортировать матрицу в заданом диапазоне индексов.
мисс_граффити
26.12.2006 16:49
как отсортировать? по строкам, столбцам, отдельным элементам? по убыванию, возрастанию? что сравнивать - суммы, произведения, наибольшие/наименьшие элементы? телепаты на новогодних каникулах.
Dimon-fx
26.12.2006 17:24
Сортировать по строкам, по убыванию, методом обмена, чтобы все елементы сортировались в заданом диапазоне индексов. Ввести диапазон и по этому диапазону оно должно сортировать.
мисс_граффити
26.12.2006 17:33
напечатай по-человечески задание! как тебе его дали, дословно. или приведи пример: что на входе, что получится на выходе.
З.Ы. обменных сортировок много. можно пользоваться любой?
Dimon-fx
26.12.2006 17:34
Ниче что по украински?
Відсортувати одновимірний масив за спаданням методом обміну. Всі елементи масива, що знаходяться в заданому діапазоні індексів.
volvo
26.12.2006 17:44
Ниче, если я на Lisp-е тебе программу приведу? Или на Forth-е?
P.S.
Цитата
одновимірний масив
как-то не вяжется с
Цитата
Помогите плз с сортировкой матрицы
Dimon-fx
26.12.2006 17:47
мисс_граффити
26.12.2006 18:05
volvo, эт я виновата. Попросила дословно Dimon-fx
Program Bubble; uses crt; const n=10; var ar: array[1..n] of integer; i, j, T, nachalo, konec: Integer; Begin clrscr; randomize; for i:=1 to n do begin ar[i]:=random(10); write(ar[i],' '); end; writeln; writeln('vvedite granicy'); readln(nachalo); readln(konec); For i := nachalo To konec Do For j := konec DownTo i+1 Do If ar[Pred(j)] < ar[j] Then Begin T := ar[Pred(j)]; ar[Pred(j)] := ar[j]; ar[j] := T End; for i:=1 to n do write(ar[i],' '); End.
Допиши сам проверку, чтобы nachalo<konec nachalo,konec<n nachalo,konec>1
Dimon-fx
26.12.2006 18:35
ОК! СПАСИБО большое мисс_граффити!!!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.