1 2 3 4 5 6 7 8 9 10 11 12 13 | 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 |