минимумы и максимумы

[Invader]

есть массив переменных

Код: Выделить всё

dim s(n) as single
s(1)=22,4
s(2)=11,7
...
s(n)=21,5


в каком направлении двигаться, с каким числом сравнивать значения для поиска минимально, если значения не явно присваиваются как в данном примере, а через интернет

[Хакер]

Смысл вопроса совершенно неуловим.

[Invader]

что же я не уточнил, массив переменных, одномерный.
если у меня два числа на переменных тогда типо

Код: Выделить всё

if x(1)<x(2) then x(1)=min
else x(2)=min

но чисел-переменных скажем 30, что же друг с другом их переравнять?

[Хакер]

что же я не уточнил, массив переменных, одномерный.

Нормальные программисты не говорят «массив переменных». Это какой-то теплично-академический термин, по-моему.

но чисел-переменных скажем 30, что же друг с другом их переравнять?

Ты не знаешь, что ли, как найти минимальный по значение элемент массива?

[Invader]

туплю, но да. я академию не заканчивал, сори...
пользуюсь только гуглом, "элегантного" решения не нашел.
ищу просто и понятно, любой пример в этом направлении

[Хакер]

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

[Invader]

ну, а если первый окажется самым большим, то все будут меньше его - все минимальны?

[Хакер]

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

Код: Выделить всё

min_index = arr(lbound(arr))
for i = lbound(arr) + 1 to ubound(arr)
   if arr(min_index) > arr(i) then min_index = i
next i

msgbox "Индекс минимального элемента равен " + cstr(min_index) + ", а его значение: " + cstr(arr(min_index))

Трудно, блин?

[Invader]

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

[Хакер]

типо если

Типо код тебе ни о чём не говорит?

[Invader]

спасибо за код, пока писал ответ Ваш код чудесным образом появился.

[Yabloko9393]

Invader-умён и жаден,
характер отсуствует

[Хакер]

[Хакер] :: Yabloko9393 получает ** за совокупность некрофилии и абсолютного оффтопика/флуда. Ну и испорченную с первого же сообщения репутацию, конечно же.