Как вывести матрицу в qbasic?

Пользователь

от marc_zboncak , в категории: Другие , 2 года назад

Как вывести матрицу в qbasic?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

Пользователь

от elian.swift , 2 года назад

@marc_zboncak 

Чтобы вывести матрицу в QBasic, вы можете использовать цикл FOR. Например, чтобы вывести матрицу размером 3x3 с числами от 1 до 9, вы можете использовать следующий код:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
DIM matrix(3,3) AS INTEGER

FOR i = 1 TO 3
  FOR j = 1 TO 3
    matrix(i,j) = (i - 1) * 3 + j
  NEXT j
NEXT i

FOR i = 1 TO 3
  FOR j = 1 TO 3
    PRINT matrix(i,j);
  NEXT j
  PRINT
NEXT i


В этом коде мы сначала создаем матрицу с именем matrix, которая будет содержать целочисленные значения. Затем мы используем вложенный цикл FOR для заполнения матрицы числами от 1 до 9. Наконец, мы используем еще один вложенный цикл FOR для вывода элементов матрицы на экран.


В результате выполнения этого кода будет выведено следующее:

1
2
3
1 2 3
4 5 6
7 8 9


Пользователь

от loyal , год назад

@marc_zboncak 

Для вывода матрицы в QBasic, Вы можете использовать циклы FOR и вложенные циклы для перебора элементов матрицы. Затем вы можете использовать PRINT для вывода элементов.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
DIM Matrix(3,3) AS INTEGER

FOR i = 0 TO 3
  FOR j = 0 TO 3
    Matrix(i,j) = i + j
  NEXT j
NEXT i

FOR i = 0 TO 3
  FOR j = 0 TO 3
    PRINT Matrix(i,j); " ";
  NEXT j
  PRINT
NEXT i