Для контроля массив заполняется случайными числами. Если заполнять автоматически не надо, то выделенные строки можно исключить, размерность массива изменить и вводить вручную (или считывать из файла)
DIM A(5, 5)
RANDOMIZE TIMER
FOR I = 1 TO 5
FOR J = 1 TO 5
A(I, J) = RND(1) * 10 - RND(1)*5
PRINT A(I, J); " ";
IF I = 1 AND J = 1 THEN
MAX = A(I, J)
MIN = A(I, J)
END IF
IF MIN > A(I, J) THEN MIN = A(I, J)
IF MAX < A(I, J) THEN MAX = A(I, J)
NEXT J
PRINT
NEXT I
PRINT "MAX="; MAX, "MIN="; MIN
L = INT(MAX) - ABS(FIX(MIN))
PRINT "L="; L