Найти 2 минимальных элемента массива - VB
Формулировка задачи:
помогите пожалуйста...
в VB дан массив с от 0 до 10
нужно вывести массив в произвольном порядке
и найти 2 минимальных элемента этого массива
Решение задачи: «Найти 2 минимальных элемента массива»
textual
Листинг программы
- min2 = Abs(sourceArray(0)) + Abs(sourceArray(1))
- For i = 0 To 10
- If (sourceArray(i) > min1) And (sourceArray(i) < min2) Then min2 = sourceArray(i)
- Next i
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д