Получить матрицу А(5,4), первая строка которой задается формулой а1j=2j+3, вторая задается формулой а2j=5j — 3, а каждая следующая строка есть сумма двух предыдущих- QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
11
12
13
DIM a(5, 4)
FOR i = 1 TO 5
    FOR j = 1 TO 4
        IF i = 1 THEN a(i, j) = 2 * j + 3 ELSE IF i = 2 THEN a(i, j) = 5 * j - 3 ELSE a(i, j) = a(i - 1, j) + a(i - 2, j)
    NEXT
NEXT
PRINT ("matrica")
FOR i = 1 TO 5
    FOR j = 1 TO 4
        PRINT a(i, j); " ";
    NEXT
    PRINT
NEXT

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

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

Leave a Comment