Дан двумерный массив, размер 6х7. Определить, сумма каких элементов больше - 2-го столбца или 3-ей строки?

var      a : array [1..6, 1..7] of Integer;      i, e, col, row : Integer;begin     for i := 1 to 6 do         for e := 1 to 7 do             a[i, e] := Random(100);     for i := 1 to 7 do col := col + a[2, i];     for i := 1 to 6 do row := row + a[i, 3];     if col > row then Writeln('2-го столбца');     if col < row then Writeln('3-ей строки');     if col = row then Writeln('равны');     Readln;end.