Дан целочисленный массив В[5,5]. Вычислить сумму элементов этого массива, расположенных выше левой диагонали- QBasic(Бейсик)

DIM B(5, 5) AS INTEGER
  ' Заполним массив и на экран его
  CLS
  RANDOMIZE TIMER
  FOR iy = 1 TO 5: FOR ix = 1 TO 5
   IF ix > iy THEN COLOR 10 ELSE COLOR 7
   B(ix, iy) = RND * 101
   PRINT B(ix, iy);
  NEXT: PRINT : NEXT
  ' Ищем сумму эл-в выше главной диагонали
  FOR iy = 1 TO 5: FOR ix = 1 TO 5
   IF ix > iy THEN S = S + B(ix, iy)
  NEXT: NEXT
  PRINT "Summa elementov ="; S