Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Найти минимум матрицы!

Автор: kvadrat 25.05.2008 4:03

Дан двумерный массив,размерности [m;n] найти минимум матрицы, отсортировать по возростанию, упорядочить все элементы матрицы по сортировке неймона.

Я думаю задача на минимум матрицы уже гдто решалась но немогу найти (помогите ссылкой). Отсортировать по возростанию это как, как должен ответ выводиться? Сортировку неймона (слияниями) нашёл в факе.
Обьясните плиз как решать?

Автор: habi 25.05.2008 5:17

Минимум и максимум..
читай построчно матрицу

Procedure FindMinMax(var X:TArray; n:Integer; var Min:Real; 
var NMin:Integer; var Max:Real; var NMax:Integer);
Var
i:Integer;
Begin
NMin:=1; Min:=X[NMin];
NMax:=1; Max:=X[NMax];
For i:=1 to n Do
If X[i] < Min Then Begin
NMin:=i; Min:=X[NMin];
End;
If X[i] > Max Then Begin
NMax:=i; Max:=X[NMax];
End;
End;
End;



Автор: kvadrat 25.05.2008 15:04

А без процедуры как неподскажеш?

Автор: kvadrat 26.05.2008 2:57

Там ведь одномерный массив! mad.gif Как отсортировать двумерный массив слиянием без процедур и функций подскажите пожалуйсто!!

Автор: sintanial 27.05.2008 2:54

Напиши, что такое сортировка неймона. И сортировок по возрастанию, убыванию очень много в FAQ- ищи там. Можно даже красиво сделать через индексную сортировку =)
Квадрат, сначало выкладывай то что ты делал, что пытался, а тута уже помогут исправить ошибки =)!

Автор: volvo 27.05.2008 3:03

Цитата
Как отсортировать двумерный массив слиянием без процедур и функций подскажите пожалуйсто!!
Ты что, издеваешься, в конце-то концов? Что тебе далось это "без процедур и функций"? Как ты собрался рекурсию реализовывать без процедур (если ты не в курсе, то алгоритм http://forum.pascal.net.ru/index.php?showtopic=3065&st=0&p=29957&#entry29957 - рекурсивный)...