Дана квадратная матрица 3 порядка. Увеличить положительные элементы матрицы в 2 и 3 строках в 2 раза. Вывести на печать исходную и новую матрицу.- QBasic(Бейсик)

DIM a(1 TO 3, 1 TO 3)
RANDOMIZE TIMER
CLS
 
FOR i = 1 TO 3
FOR j = 1 TO 3
a(i, j) = INT(RND * 21 - 10)
PRINT a(i, j),
NEXT j
PRINT
NEXT i
 
PRINT
 
FOR i = 1 TO 3
FOR j = 1 TO 3
IF i > 1 AND a(i, j) > 0 THEN a(i, j) = a(i, j) * 2
PRINT a(i, j),
NEXT j
PRINT
NEXT i