Найти минимальный элемент одномерного массива и его номер в массиве

@Vabychkov · Регистрация: 28.01.2010

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

Господа, помогите решить задачку на VBasic:
Найти минимальный элемент одномерного массива и его номер в массиве.Для формирования массива использовать датчик сучайных чисел.Диапазон случайных чисел;от(-100)до +100

А то в инсте дали задание, а я ни в зуб ногой...

@BasicMan · 28.01.2010, 16:34

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
dim arr(1 to 10000)
 
for i=1 to 10000
arr(i)=rnd(1)*200-100
next i
 
min=arr(1)
k=1
for i=2 to 10000
if min > arr(i) then arr(i): k=i
next i
 
msgbox cstr(min) & ", " & cstr(k)

@Vabychkov · 28.01.2010, 20:53 **[ТС]**

А если так?

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Sub aaa()
 
Dim arr(1 To 10000)
 
For i = 1 To 10000
 
arr(i) = Rnd(1) * 200 - 100
 
Next i
 
Min = arr(1)
 
k = 1
 
For i = 2 To 10000
 
If Min > arr(i) Then
 
    Min = arr(i)
 
    k = i
 
End If
 
Next i
 
MsgBox CStr(Min) & ", " & CStr(k)
 
End Sub

@BasicMan · 28.01.2010, 21:00

чем то что у тебя от моего отличается?

@Vabychkov · 28.01.2010, 21:01 **[ТС]**

и еще вопрос, как описать порядок составления программы?

Добавлено через 34 секунды
тормозю, ничем)

Новые блоги и статьи Все статьи Все блоги /
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .	Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .

@Vabychkov 0 / 0 / 0 Регистрация: 28.01.2010 Сообщений: 3

	Найти минимальный элемент одномерного массива и его номер в массиве 28.01.2010, 16:30. Показов 7978. Ответов 4 Метки нет (Все метки) Господа, помогите решить задачку на VBasic: Найти минимальный элемент одномерного массива и его номер в массиве.Для формирования массива использовать датчик сучайных чисел.Диапазон случайных чисел;от(-100)до +100 А то в инсте дали задание, а я ни в зуб ногой... 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	28.01.2010, 21:00
	чем то что у тебя от моего отличается? 0

@Vabychkov 0 / 0 / 0 Регистрация: 28.01.2010 Сообщений: 3
	28.01.2010, 21:01 [ТС]
	и еще вопрос, как описать порядок составления программы? Добавлено через 34 секунды тормозю, ничем) 0