Найти количество отрицательных элементов матрицы, расположенных на побочной диагонали и выше ее - QBasic

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

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

дана матрица nxn. найти количество отрицательных элементов,расположенных на побочной диагонали и выше ее,а также максимальный элемент побочной диагонали.

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

textual
Листинг программы 
CLS
OPEN "input.txt" FOR INPUT AS #1
INPUT #1, n
DIM a(n, n)
FOR i = 1 TO n
FOR j = 1 TO n
INPUT #1, a(i, j)
NEXT
NEXT
CLOSE
CLS
FOR i = 1 TO n
FOR j = 1 TO n
PRINT a(i, j);
NEXT: PRINT
NEXT

Объяснение кода листинга программы

  1. Задание размера матрицы n.
  2. Заполнение матрицы a значениями из файла input.txt.
  3. Закрытие файла input.txt.
  4. Очистка экрана.
  5. Вывод значений матрицы a на экран.

ИИ для рефератов и докладов

  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

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

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