Двумерный массив. задача на бейсике

[nikita1]

Найти количество ненулевых элементов в каждом столбце матрицы М(10,20). Полученные числа напечатать с указанием номера столбца в том случае, если они больше 2.

вот начало.

DIM M(1 TO 10, 1 TO 20) AS SINGLE
DIM k AS INTEGER
RANDOMIZE TIMER
FOR i = 1 TO 10
FOR j = 1 TO 20
M(i, j) = INT((41) * RND) + 10
NEXT j
NEXT i
FOR i = 1 TO 10
FOR j = 1 TO 20
PRINT M(i, j)
NEXT j
PRINT
NEXT i

FOR j = 1 TO 20
k = 0
FOR i = 1 TO 10
IF M(i, j) <> 0 THEN
k = k + 1
END IF
NEXT i
NEXT j