В двумерном найти минимальный элемент и указать его номер — QBasic(Бейсик)

DIM A(10, 10)
RANDOMIZE TIMER
FOR I = 1 TO 10
    FOR J = 1 TO 10
        A(I, J) = INT(RND * 101) - 50
    NEXT J
NEXT I
MIN = A(1, 1)
IMIN = 1
JMIN = 1
FOR I = 1 TO 10
    FOR J = 1 TO 10
        IF A(I, J) < MIN THEN MIN = A(I, J): IMIN = I: JMIN = J
    NEXT J
NEXT I
CLS
FOR I = 1 TO 10
    FOR J = 1 TO 10
        PRINT A(I, J);
    NEXT J
    PRINT
NEXT I
PRINT "Minimalnyj element="; MIN
PRINT "Nomer stroki="; IMIN
PRINT "Nomer stolbca="; JMIN