Значение элементов матрицы W (3,4) увеличить на величину индекса строки с минимальным элементом. Сам минимальный элемент оставить без изменений. Принять, что минимальный элемент в матрице один — QBasic(Бейсик)

DIM w(3, 4)
FOR i = 1 TO 3
    FOR j = 1 TO 4
        INPUT "vvedite element ", w(i, j)
    NEXT
NEXT
PRINT "ishodnyj massiv"
FOR i = 1 TO 3
    FOR j = 1 TO 4
        PRINT w(i, j);
    NEXT
    PRINT
NEXT
xmin = 1
ymin = 1
FOR i = 1 TO 3
    FOR j = 1 TO 4
        IF w(i, j) < w(xmin, ymin) THEN xmin = i: ymin = j
    NEXT
NEXT
PRINT "nomer stroki="; xmin
FOR i = 1 TO 3
    FOR j = 1 TO 4
        IF (i <> xmin) OR (j <> ymin) THEN w(i, j) = w(i, j) + xmin
    NEXT
NEXT
PRINT "novyj massiv"
FOR i = 1 TO 3
    FOR j = 1 TO 4
        PRINT w(i, j);
    NEXT
    PRINT
NEXT