Вычислить сумму положительных элементов массива - VB
Формулировка задачи:
ребята помогите плиз!!! пол семестра проболела, а сессия с понедельника начинается(((
1. Вычислить сумму позитивных элементов массива с(м.м) расположенных под второстепенной диагональю. Записать индексы этих элементов в массив К.
2. выполнить этап визуального проектирования - создать форму и разместить на ней элементы управления.
Решение задачи: «Вычислить сумму положительных элементов массива»
textual
Листинг программы
Sub Task1(A() as double,K() as integer, S as double) p%=0 S=0 n%=Ubound(A,1) For i%=1 to n% For j%=1 to n%-i% If A(i%,j%) > 0 then S=S+A(i%,j%) p%=p%+1 K(p%)=i% p%=p%+1 K(p%)=j% End if Next j% Next i% End sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д