В одномерном массиве, содержащим N элементов найти сумму положительных элементов - VB

Узнай цену своей работы

Формулировка задачи:

В одномерном массиве, содержащим N элементов найти сумму положительных элементов.
ошибка 'Runtime error '9': Subscript out of range'

Решение задачи: «В одномерном массиве, содержащим N элементов найти сумму положительных элементов»

textual
Листинг программы
av = Split(Text2, " ") ' разбивает строку по разделителю '
 * *tt = 0
* * For j = 1 To Len(Text2) ' находим кол-во пробелов
 * * * *If Mid(Text2, j, 1) = " " Then tt = tt + 1 *''tt кол-во пробелов
 * *Next j

Оцени полезность:

15   голосов , оценка 3.867 из 5
Похожие ответы