Матрицы Опции

[anonim]

Помогите пожалуйста.
Сравнить сумму элементов k-й строки и k-го столбца квадратной матрицы.
Спасибо заранее)

[TarasBer]

sum_k_str := 0;
for i := Low(M[k]) to High(M[k]) do sum_k_str := sum_k_str + M[k,i];

sum_k_stb := 0;
for i := Low(M) to High(M) do sum_k_stb := sum_k_stb + M[i,k];

if sum_k_str > sum_k_stb then...