INPUT "KOL-VO STOLBOV="; n
INPUT "KOL-VO STROK="; m
DIM A(m, n)
FOR I = 1 TO m
FOR J = 1 TO n
INPUT A(I, J)
NEXT J
NEXT I
FOR I = 1 TO m
FOR J = 1 TO n
PRINT A(I, J);
NEXT J
PRINT
NEXT I
FOR I = 1 TO m
FOR J = 1 TO n
IF A(I, J) > 9 AND A(I, J) < 100 THEN K = K + 1
NEXT
NEXT
PRINT "K="; K
END
Тестирование выполнено в программе QB64 ( Скачать )