Для каждого столбца матрицы определить сумму и число положительных элементов. - VB

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

Помогите, пожалуйста, с заданием: Заполнить блок ячеек (7*8) случайными числами из диапазона [-5.5;5.5]. Для каждого столбца матрицы определить сумму и число положительных элементов. Ячейки, содержащие сумму - вывести полужирным курсивом,количество - красным цветом шрифта. Visual Basic.

Решение задачи: «Для каждого столбца матрицы определить сумму и число положительных элементов.»

textual
                            Листинг программы 
                        
 
                        
                          
                    
FOR j = 1 TO 8
FOR i = 1 TO 7
   IF A(i, j) > 0 THEN 
      S(j) = S(j) + A(i, j)
      N(j) = N(j) + 1
   END IF
NEXT i, j

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

6 голосов , оценка 3.5 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы