Вывести на экран таблицу w(7, 7) - VB

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

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

Вывести на экран таблицу w(7, 7) , у которой элементы главной диагонали (i = j) равны 1, элементы выше главной диагонали равны сумме индексов (i + j), а элементы ниже ее – разности индексов (i - j)

Решение задачи: «Вывести на экран таблицу w(7, 7)»

textual
Листинг программы
CLS
REDIM w(7, 7)
 
FOR i = 1 TO 7
FOR j = 1 TO 7
   IF i < j THEN
      w(i, j) = i + j
   ELSEIF i > j THEN
      w(i, j) = i - j
   ELSE
      w(i, j) = i
   END IF
 
   PRINT w(i, j);
NEXT j: PRINT
NEXT i

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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