В двумерном массиве 7Х7 произвольных целых чисел вычислить сумму элементов, расположенных слева от побочной диагонали. Определить минимальный элемент главной диагонали (значение и координаты)

const   n = 7; var   a: array[1..n, 1..n] of integer;   i, j, sum, min, imin: integer; begin   Randomize;   for i := 1 to n do     for j := 1 to n do       a[i, j] := random(100) - 50;   writeln('Исходный массив');   for i := 1 to n do   begin     for j := 1 to n do write(a[i, j]:4);     writeln   end;   sum := 0;   min := 100; //у нас в массиве числа на (-50:50)   for i := 1 to n - 1 do     for j := 1 to n - i do       sum := sum + a[i, j];   for i := 1 to n do     if min > a[i, i] then begin       min := a[i, i];       imin := i     end;   writeln('Сумма элементов левее побочной диагонали=', sum);   writeln('Минимальный элемент на главной диагонали=', min, ', его координаты (', imin, ',', imin, ')') end. Контрольный пример: Исходный массив   14  39  -7 -26  10 -33   9   48 -21 -19   6   2  24 -16   27 -41 -26  -7  16 -27 -34   42  32 -12 -37  -9  20 -26  -35 -20 -34  40  -3   5   1   23  31 -11  -9  26 -28  25   34  26 -30  11  43  19 -26 Сумма элементов левее побочной диагонали=-4 Минимальный элемент на главной диагонали=-37, его координаты (4,4)