поиск наибольшего числа

[kollaps]

Здаравствуйте уважаемые форумчане, я еще новичок в программировании и поэтому у меня возникла такая проблема:
Имеетря четыре разноименных переменных содержащих числа типа Integer, как среди них выбрать наибольшее число? И еще, как будет выглядеть алгоритм выбора для N числел?

[GSerg]

А из двух ты как выбираешь?

[JumpingJack]

Массив делай.. иначе никак..

[Sirik]

Массив делай.. иначе никак..

а колекция?

[kollaps]

Мучался мучался и кое что сделал
получилось вот кое что, может кому пригодиться

Dim Max As Integer
Dim i As Integer
Dim myarray(1 To 4) As Integer

myarray(1) = Z1
myarray(2) = Z2
myarray(3) = Z3
myarray(4) = Z4

Max = 1
For i = 2 To UBound(myarray)
If myarray(i) > myarray(Max) Then
Max = i
End If
Next i
print myarray(Max) & Max

[alibek]

Метод пузырька?
Может, конечно, и пригодится, но сомневаюсь.

[RayShade]

Если массив большой то лучше всего его сортировать сперва.

А потом, искать методом этого, как его. Ну когда, берут середину диапазона....

[alibek]

Рэй, ты чего???
Если массив отсортирован, зачем искать???

[kollaps]

Ну вот, раскритиковали в пух и прах. Приведите пример чтобы не мучиться.

[Amed]

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

sub ...()
const N as integer=4
dim mas(1 to N) as integer, max as integer, i as integer
mas(1)=...
mas(2)=...
...
mas(N)=...

max=mas(1)
for i = 2 to N
if mas(i)>max then max=mas(i)
next i

msgbox max
end sub

[kollaps]

Ну и чем это отличается от моего примера?

[GSerg]

Тем, что запоминается не индекс элемента, а его значение. Что экономит половину времени на доступ к массиву.

[RayShade]

alibek

А! Блин! Да! Меня переклинило на поиск конкретного значения в массиве

[kollaps]

Да, запиманается значение, а если нужно знать не только значение но и его индекс (что иногда полезнее).

[alibek]

Ну и чем это отличается от моего примера?

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

[kollaps]

У меня вот тут попутно еще вопорс возник: этот код ищет первое максимальное значение и выдает его и его индекс, а если все числа равны? или есть несколько равных чисел..... Если не сложно поделитесь своими соображениями.

[alibek]

А если все числа равны, какая тебе разница, какое из равных чисел использовать?

[kollaps]

Хм, дело в том что каждая из разно именных переменных содержит какое-то число типа integer, но неизвестное число, так вот, требуется узнать максимальное. Ну если приводить абстрактный пример, то: есть таблица из трех столбиков: в первом столбике номер цеха по произвводству "чего-либо", во втором норма выработки этого "чего-либо", и, наконец, в третьем количество этого "чего-либо" реально выработанное цехом. Ну и например нужно узнать какой цех работает с наибольшей эффективностью в процентах (отношение второго столбика к первому умноженное на 100) и вывести этого рекордсмена в отдельной табличке с указанием номера цеха и количеством этих самых процентов. Тогда вопрос "если все числа равны"и "если несколько равны" очень актуален.

[GSerg]

Автору рекомендуются к изучению темы "Базы данных" и "SQL".

[uhm]

Метод пузырька?

При чем здесь пузырек? Это ж не сортировка, а поиск максимального элемента. Походу, тебя, как и RayShade'а "переклинило" на другую задачу

[GAGArin]

Ага, тоже не врубаюсь причем тут пузырек и вообще сортировка. А по ходу второго вопроса, ну создай массив ответов. При нахождении большего значения сброс старых ответов и запись его в массив ответов, при нахождении равного просто добавление еще одного ответа. Хотя SQL действительно рулит на таких задачах ) Зачем писать то что уже есть?

[Andrey Fedorov]

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

П приведенных примерах никакой сортировки не было вообще, да и не нужна она тут. Ну а пузырек я иногда использую - когда знаю что много значений по определению не будет, а массивчик нужно отсортировать... Чем плохо?

[alibek]

Хм...
Видимо непонятно объяснил.
Пузырьковая сортировка -- это не плохо.
Это никому не нужно.
Не потому, что пользы от нее мало, а потому что алгоритм простой и любой его может реализовать самостоятельно и без примера в справочнике.

[Andrey Fedorov]

Хм...
Видимо непонятно объяснил.
Пузырьковая сортировка -- это не плохо.

Хм... Видимо тоже непонятно объяснил

Не было ее тут в примерах. Напрочь.
А первый разговор о ней завел кто? И по какой причине?

[CORBA]

Идеалогию развели... блин.

Немного абстракции для усвоения... (лично мне легче запомнить алгоритм словестно)

"Метод кучки монет"
У нас есть кучка монет. Как найти самую тяжелую? Для этого берем первую и предполагаем что она самая тяжелая, берём следующую если она тяжелее, то старую отбрасываем и так до тех пор пока не переберём всю кучку. В конце у нас останется самая тяжелая.