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

Вниз

Как найти минимальный элемент в двумерном массиве?   Найти похожие ветки 

 
Andrewmx   (2005-11-11 15:30) [0]

Как найти минимальный элемент в двумерном массиве? Подскажите пожалуйста.


 
Digitman ©   (2005-11-11 15:31) [1]

ты хоть бы сподобился что ли указать, какого типа элементы массива ...


 
Andrewmx   (2005-11-11 15:35) [2]

Извините integer


 
Andrewmx   (2005-11-11 15:35) [3]

все >0


 
wal ©   (2005-11-11 15:53) [4]

А как в одномерном найти в курсе?


 
Digitman ©   (2005-11-11 15:53) [5]

и тип массива ты тоже не сподобился указать ...


 
Andrewmx   (2005-11-11 15:55) [6]

Minintvalue в одномерном, мне в двумерном нужно.

вот мой массив
res:array[0..99,00..99] of integer;


 
Digitman ©   (2005-11-11 16:00) [7]

и какие трудности ?

или "дай код" ?)


 
Andrewmx   (2005-11-11 17:22) [8]

Ну да я незнаю как сделать :(


 
Tonich ©   (2005-11-11 17:37) [9]

в самом простом случаи методом перебора...

Сделай двойной цикл и пробегай все элементы массива сравнивая их.
на первом шаге просто присвой какой-то переменной первое значения твоего массива, а затем если оно окажется больше текущего значения массива, просто переприсвоишь его и все


 
Fl@sh ©   (2005-11-11 19:51) [10]


> Tonich ©   (11.11.05 17:37) [9]


Всегда так делал в подобных случаях
Жаль, не знал раньше про
> Minintvalue в одномерном


 
serko ©   (2005-11-11 20:19) [11]

Делай так:


<\code>
Min:=res[1,1];
st:=1; sb:=1;
For i:=1 to n do
    for j:=1 to m do
         if min>res[i,j] then
                            begin
                                   min:=res:=[i,j];
                                   st:=i;
                                   sb:=j;
                             end;

min - это минимальный элемент массива Res
St - строка в которой находится min
sb- столбец ----||----


 
Andrewmx   (2005-11-12 04:42) [12]

Спасибо большое!


 
Andrewmx   (2005-11-12 09:12) [13]

А если кто хорошо работает с матрицами то постучитесь мне в icq 288608091 есть разговор!


 
SergP ©   (2005-11-12 09:52) [14]


> Andrewmx   (11.11.05 15:55) [6]
> Minintvalue в одномерном, мне в двумерном нужно.
>
> вот мой массив
> res:array[0..99,00..99] of integer;


если не знаешь как самому написать поиск числа, а хочешь воспользоваться стандартными функциями, то заставь Minintvalue думать что твой массив одномерный ...

типа так:


...
type
  MySuperPuperType=array[0..9999] of integer; // кол-во элементов в этом
  //описании массива должно соврпадать с кол-вом элементов в твоем массиве
...
...
var
 a:integer;
 z:^MySuperPuperType;
begin
 z:=@res; // res - это твой двухмерный массив [0..99,0..99]
 a:=minintvalue(z^);
...


если я нигде не ошибся то по идее должно работать...


 
SergP.   (2005-11-12 09:57) [15]


> SergP ©   (12.11.05 09:52) [14]


Либо проще:


...
type
 MySuperPuperType=array[0..9999] of integer; // кол-во элементов в этом
 //описании массива должно соврпадать с кол-вом элементов в твоем массиве
...
...
var
a:integer;
begin
a:=minintvalue(MySyperPuperType(res));
...



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

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

Наверх




Память: 0.49 MB
Время: 0.032 c
1-1130868953
Alexander Dakis
2005-11-01 21:15
2005.11.27
Как создать динамическое выделение текста, как в редакторе Delphi


11-1112381631
Ripper
2005-04-01 22:53
2005.11.27
HotKey


4-1127571941
АлЁша
2005-09-24 18:25
2005.11.27
Посылка сообщений


5-1113682257
Бывший студент
2005-04-17 00:10
2005.11.27
Использование TFont


6-1124020303
Ахмет
2005-08-14 15:51
2005.11.27
TWebBrowser