Найти количество отрицательных элементов матрицы, расположенных на побочной диагонали и выше ее - 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
Объяснение кода листинга программы
- Задание размера матрицы
n
. - Заполнение матрицы
a
значениями из файлаinput.txt
. - Закрытие файла
input.txt
. - Очистка экрана.
- Вывод значений матрицы
a
на экран.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д