Описать матрицу 8х8 элементов. Заполнить элементы матрицы согласно варианту:
16 8
15 7
. .
. . .
. . .
. 10 2
17 9 1
Распечатать элементы матрицы с помощью подпрограммы с указанием сумм по каждой строке и каждому столбцу, а также общей суммы. Расположить элементы в строках по убыванию.
Уточни пример, и почему в последней строке три эл-та, а в остальных только по два.
Кстати если делать по твоему примеру, то левый верхний эл-т будет равен 15, а правый нижний 1
curr := 1;
for j := 8 downto 1 do
for i := 8 downto 1 do begin
a[i, j] := curr; inc(curr);
end;