Вывести сумму элементов той строки ,для которой значение этой суммы оказалось больше заданной величины - VB

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

Для матрицы из 3 столбцов и 10 строк вывести сумму элементов той строки ,для которой значение этой суммы оказалось больше заданной величины В. Помогите,пожалуйста,нужно сделать в Visual Basic)

Решение задачи: «Вывести сумму элементов той строки ,для которой значение этой суммы оказалось больше заданной величины»

textual
                            Листинг программы 
                        

                            CLS
RANDOMIZE TIMER
 
B = 5    ' ВВЕДИТЕ СВОЕ ЗНАЧЕНИЕ
 
DIM x(10, 3) AS LONG
DIM S(10) AS LONG
 
FOR i = 1 TO 10
FOR j = 1 TO 3
   x(i, j) = 18 * RND - 9
   PRINT x(i, j);
NEXT: PRINT
NEXT: PRINT
 
FOR i = 1 TO 10
FOR j = 1 TO 3
   S(i) = S(i) + x(i, j)
NEXT j, i
 
FOR i = 1 TO 10
   IF S(i) > B THEN PRINT "STROKA"; i; "SUM ="; S(i)
NEXT
                        

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

15 голосов , оценка 3.867 из 5

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