Находить сумму положительных элементов нижнего треугольника матрицы относительно побочной диагонали- QBasic(Бейсик)

 DEFINT A-Z
n = 10
DIM A(n, n)    ' A( номер столбца , номер строки )
  CLS
  FOR iy = 1 TO n: FOR ix = 1 TO n
     ' Не включая диагональ
     IF n - iy + 1 < ix THEN COLOR 10 ELSE COLOR 7
     ' Включая диагональ (откомментироать если надо)
     'IF n - iy < ix THEN COLOR 10 ELSE COLOR 7
   A(ix, iy) = RND * 10
   PRINT A(ix, iy);
  NEXT: PRINT : NEXT