Упорядочить строки матрицы по возрастанию сумм их элементов - QBasic (27861)
Формулировка задачи:
Ребят, сижу над задачей уже 2 часа.
Задача полностью:
Дана матрица целых чисел X(n,m). Упорядочить ее строки по возрастанию сумм их элементов. Вывести исходную и полученную матрицы. Значения буквенных переменных задавать с клавиатуры.
Вот как я начал:
А дальше не могу понять( Путаюсь и не запускается программа.
Решение задачи: «Упорядочить строки матрицы по возрастанию сумм их элементов»
textual
Листинг программы
CLS
INPUT "enter n: ", n
INPUT "enter m: ", m
DIM x(n, m)
FOR i = 1 TO n
FOR j = 1 TO m
PRINT "enter x("; i; ","; j; ")";
INPUT ": ", x(i, j)
NEXT
NEXT
FOR i = 1 TO n
FOR j = 1 TO m
PRINT x(i, j);
NEXT
PRINT
NEXT
FOR i = 1 TO n
FOR j = 1 TO m
x(i, 0) = x(i, 0) + x(i, j)
NEXT
NEXT
FOR i = 1 TO n
min = x(i, 0)
q = i
FOR u = i + 1 TO n
IF x(u, 0) < min THEN min = x(u, 0): q = u
NEXT
IF q <> i THEN
FOR j = 1 TO m
SWAP x(i, j), x(q, j)
NEXT
END IF
NEXT
PRINT "new matrix: "
FOR i = 1 TO n
FOR j = 1 TO m
PRINT x(i, j);
NEXT
PRINT
NEXT