Дан двумерный массив сосстоящий из 4 строк и 5 стобцов и заполненный случайным…

var a: array [1… 5, 1… 4] of integer; min, max: integer; i, j: integer; begin min: =100; max: =1; write ('Исходный массив: '); for i: =1 to 5 do for j: =1 to 4 do begin a[i, j]: =random (99)+1; write (a[i, j], '); if a[i, j] < min then min: =a[i, j]; if a[i, j] > max then max: =a[i, j]; end; writeln; writeln ('Разность максимального и минимального элемента массива равна: ', max — min); end. Если что не понятно — спрашивай.