CLS
RANDOMIZE TIMER
DIM a(10, 10)
mini = 1
minj = 1
FOR i = 1 TO 10
FOR j = 1 TO 10
a(i, j) = INT(RND * 89) + 10
IF a(i, j) < a(mini, minj) THEN mini = i: minj = j
PRINT a(i, j);
NEXT j: PRINT
NEXT i: PRINT
PRINT "Координаты минимального элемента:"; mini;","; minj