Найти min элемент массива

@Nastya Nastya · Регистрация: 05.07.2010

Студворк — интернет-сервис помощи студентам

Ребята, спасайте

помогите пожалуйста решить задачку

"Найти min элемент массива"

буду ооочень признательна!

@Alex77755 · 05.07.2010, 20:24

массив одно-двух-трёх-.....мерный?
в принципе однотипно. Назначаешь за миниум первый элемент: MIN = M(1) или MIN = M(1, 1)
или MIN = M(1, 1, 1)
А потом в цикле сравниваешь. И если текущий элемент меньше - берёшь его за миниум:

@Nastya Nastya · 05.07.2010, 20:53 **[ТС]**

Мне очень стыдно, но написала я сюда, потому что я дуб дубом в информатике!
Я даже не представляю как это все делать
массив одномерный
Если не сложно, не могли бы Вы по подробнее написать решение?
Заранее спасибо

@gaw · 05.07.2010, 21:02

если Вы, я извиняюсь,

Сообщение от Nastya Nastya

дуб дубом

, так зачем оно Вам

@Nastya Nastya · 05.07.2010, 21:07 **[ТС]**

1 курс, информатика
без этого не сдам)

@gaw · 05.07.2010, 21:32

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub CommandButton1_Click()
Dim N As Integer, i As Integer
Dim a(), min_, k As Integer
N = Val(InputBox("вводим размерность N", , 10))
If N > 0 Then
Cells.Clear
ReDim a(N)
For i = 1 To N
a(i) = Int(Rnd * 200) - 100
Cells(i + 1, 1) = a(i)
Next i
 
min_ = a(1): k = 1
For i = 2 To N
If min_ > a(i) Then min_ = a(i): k = i
Next i
MsgBox "минимальный элемент: a(" & k & ") = " & min_
Else
MsgBox "N должно быть больше 0"
End If
End Sub

@Nastya Nastya · 05.07.2010, 21:34 **[ТС]**

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

@Toxa33rus · 06.07.2010, 00:46

Сообщение от gaw

так зачем оно Вам

Сообщение от Nastya Nastya

1 курс, информатика

Тогда действительно а зачем оно Вам? Первый курс а уже "дуб дубом".

Есть же много других профессий: юристы, муниципалы. Там только ходить надо на пары

Новые блоги и статьи Все статьи Все блоги /
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .

@Nastya Nastya 0 / 0 / 0 Регистрация: 05.07.2010 Сообщений: 4

	Найти min элемент массива 05.07.2010, 18:55. Показов 1280. Ответов 7 Метки нет (Все метки) Ребята, спасайте помогите пожалуйста решить задачку "Найти min элемент массива" буду ооочень признательна! 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	05.07.2010, 20:24
	массив одно-двух-трёх-.....мерный? в принципе однотипно. Назначаешь за миниум первый элемент: MIN = M(1) или MIN = M(1, 1) или MIN = M(1, 1, 1) А потом в цикле сравниваешь. И если текущий элемент меньше - берёшь его за миниум: 1

@Nastya Nastya 0 / 0 / 0 Регистрация: 05.07.2010 Сообщений: 4
	05.07.2010, 20:53 [ТС]
	Мне очень стыдно, но написала я сюда, потому что я дуб дубом в информатике! Я даже не представляю как это все делать массив одномерный Если не сложно, не могли бы Вы по подробнее написать решение? Заранее спасибо 0

@Nastya Nastya 0 / 0 / 0 Регистрация: 05.07.2010 Сообщений: 4
	05.07.2010, 21:07 [ТС]
	1 курс, информатика без этого не сдам) 0

@Nastya Nastya 0 / 0 / 0 Регистрация: 05.07.2010 Сообщений: 4
	05.07.2010, 21:34 [ТС]
	Спасибо большое! 0