Вывести на экран значение и индекс последнего отрицательного элемента массива - VB
Формулировка задачи:
Помогите пожалуйста решить задачку.
Вывести на экран значение и индекс последнего отрицательного элемента массива.Размерность массива не имеет значения.
Заранее благодарю
Решение задачи: «Вывести на экран значение и индекс последнего отрицательного элемента массива»
textual
Листинг программы
For i=UBound(a) to LBound(a)
if a(i)<0 then
msgbox "a(" & i & ")=" & a(i)
end if
next i