Найти максимальный элемент среди элементов матрицы, расположенных ниже главной диагонали - QBasic
Формулировка задачи:
Дана квадратная матрица размерностью mxm.
Построить вектор из положительных элементов на главной диагонали. Найти максимальный элемент среди элементов, расположенных ниже главной диагонали.
помогите,а то у меня фигня какая-то выходит(пока что только вектор пыталась высчитать)
вот такую программу сделала:
Листинг программы
- CLS
- s = 0
- INPUT "vvedite kolichestvo strok i stolbcov M ", m
- DIM a(m, m)
- FOR i = 1 TO m
- FOR j = 1 TO m
- a(i, j) = INT(RND * 50 - 25)
- NEXT
- NEXT
- PRINT "matrica "
- FOR i = 1 TO m
- FOR j = 1 TO m
- PRINT a(i, j);
- NEXT
- NEXT
- PRINT "____________"
- PRINT "vektor"
- FOR i = 1 TO m
- IF a(i, i) > 0 THEN
- s = s + 1
- END IF
- NEXT i
- DIM b(s)
- FOR l = 1 TO s
- FOR i = 1 TO m
- IF a(i, i) > 0 THEN
- b(l) = a(i, i)
- PRINT b(i)
- END IF
- NEXT i
- NEXT l
- END
Тему можно удалять.Я сделала программу.
Решение задачи: «Найти максимальный элемент среди элементов матрицы, расположенных ниже главной диагонали»
textual
Листинг программы
- max=a(1,1)
- FOR i=2 TO m
- IF a(i,i)>max THEN max=a(i,i)
- NEXT
Объяснение кода листинга программы
max
- это переменная, которая инициализируется значением элемента матрицыa(1,1)
.- Затем происходит цикл от 2 до m, где m - это количество строк в матрице.
- Внутри цикла проверяется каждый элемент матрицы
a(i,i)
, где i - это номер строки. - Если значение элемента
a(i,i)
больше значения переменнойmax
, то значение переменнойmax
обновляется значением элементаa(i,i)
. - После завершения цикла, значение переменной
max
будет содержать максимальное значение из элементов матрицы, расположенных ниже главной диагонали.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д