Определить сумму элементов массива,расположенных после минимального по модулю значения - VB
Формулировка задачи:
Определить сумму элементов массива,расположенных после минимального по модулю значения
Решение задачи: «Определить сумму элементов массива,расположенных после минимального по модулю значения»
textual
Листинг программы
- Min = Abs(Ar(0))
- For N = 1 To UBound(Ar)
- If Abs(Ar(N)) < Min Then Min = Abs(Ar(N)): Sum = 0
- Else
- Sum = Sum + Ar(N)
- End If
- Next
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
