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 ( Скачать )