Найти и исправить ошибку в программе - QBasic
Формулировка задачи:
завтра экзамен а ошибку найти не могу
Решение задачи: «Найти и исправить ошибку в программе»
textual
Листинг программы
CLS INPUT "vvedite kolichestvo strok"; m INPUT "vvedite kolichestvo stolbcov"; n DIM a(m, n), b(n, m) FOR i = 1 TO m: FOR j = 1 TO n PRINT "vvedite a("; i; ","; j; ")" INPUT a(i, j) NEXT: NEXT CLS FOR i = 1 TO m: FOR j = 1 TO n b(j, i) = a(i, j) NEXT: NEXT PRINT "matrica" FOR i = 1 TO m: FOR j = 1 TO n PRINT a(i, j); NEXT: PRINT: NEXT PRINT "new matrica" FOR i = 1 TO n: FOR j = 1 TO m PRINT b(i, j); NEXT: PRINT: NEXT
Объяснение кода листинга программы
- В первой строке программы объявляются две переменные
m
иn
типа INPUT, в которые с помощью функции INPUT заносятся значения количества строк и столбцов матрицы соответственно. - Далее, с помощью оператора DIM, создается двумерный массив
a
размеромm
наn
, в который будет заноситься исходная матрица. - Затем, с помощью двух вложенных циклов FOR, программа просит ввести все элементы матрицы
a
. - После ввода всех элементов, с помощью оператора NEXT, происходит переход к следующему циклу.
- Аналогично, создается двумерный массив
b
размеромn
наm
, в который будет заноситься результат работы алгоритма. - С помощью двух вложенных циклов FOR, программа заполняет массив
b
значениями матрицыa
, меняя местами строки. - Затем, с помощью функции PRINT, выводится исходная матрица
a
, а после нее - измененная матрицаb
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д