Вычислить элементы матрицы с, являющейся сумой матриц а и b размер матрицы 3*7- QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
DIM a(1 TO 3, 1 TO 7) AS INTEGER
DIM b(1 TO 3, 1 TO 7) AS INTEGER
DIM c(1 TO 3, 1 TO 7) AS INTEGER
FOR i = 1 TO 3
    FOR j = 1 TO 7
        INPUT "BBEDITE A", a(i, j)
        INPUT "BBEDITE B", b(i, j)
    NEXT j
NEXT i
 
FOR i = 1 TO 3
    FOR j = 1 TO 7
        c(i, j) = a(i, j) + b(i, j)
        PRINT c, i, j
    NEXT j
NEXT i
 
END

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment