Определить сумму отрицательных чисел, расположенных над главной диагональю - VB
Формулировка задачи:
Определить сумму отрицательных чисел, расположенных над главной диагональю С(5,5).
Решение задачи: «Определить сумму отрицательных чисел, расположенных над главной диагональю»
textual
Листинг программы
- FOR i = 1 TO 4
- FOR j = i + 1 TO 5
- If C(i, j) < 0 THEN S = S + C(i, j)
- NEXT
- NEXT
- If S = 0 THEN
- PRINT "Отрицательных чисел нет"
- ELSE
- PRINT "Сумма отрицательных чисел ="; S
- END IF
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д