Построить алгоритм и написать программу на языке Basic. Задана вещественная матрица. Напишите программу вычисления величины L=max-|min|, где max - целая часть максимального элемента, min - целая часть минимального элемента матрицы A.
10 DEFINT A-Z 20 DIM A(3,3) 30 DATA 1,2,3,4,5,6,7,8,9 40 FOR I=1 TO 3 50 FOR J=1 TO 3 60 READ A(I,J) 70 NEXT J 80 NEXT I 90 MAX = INT(A(1,1)) 100 MIN = INT(A(1,1)) 110 FOR I=1 TO 3 120 FOR J=1 TO 3 130 IF INT(A(I,J)) > MAX THEN MAX = INT(A(I,J)) 140 IF INT(A(I,J)) < MIN THEN MIN = INT(A(I,J)) 150 NEXT J 160 NEXT I 170 L = MAX - ABS(MIN) 180 PRINT "L = "; L
20 DIM A(3,3)
30 DATA 1,2,3,4,5,6,7,8,9
40 FOR I=1 TO 3
50 FOR J=1 TO 3
60 READ A(I,J)
70 NEXT J
80 NEXT I
90 MAX = INT(A(1,1))
100 MIN = INT(A(1,1))
110 FOR I=1 TO 3
120 FOR J=1 TO 3
130 IF INT(A(I,J)) > MAX THEN MAX = INT(A(I,J))
140 IF INT(A(I,J)) < MIN THEN MIN = INT(A(I,J))
150 NEXT J
160 NEXT I
170 L = MAX - ABS(MIN)
180 PRINT "L = "; L