ПОМОГИТЕ ПОЖАЛУЙСТА!!
Значения двумерного массива размера 7×7 задаются с помощью вложенного оператора цикла в представленном фрагменте программы:
Сколько элементов массива будут иметь положительные значения?
for n:=1 to 7 do
for k:=1 to 7 do
B[n, k]:=k–n;

Спасибо большое

В строке с  n = 1 подойдут 6 значений k: k = 2, 3, 4, 5, 6, 7 - для них k - n > 0.В строке n = 2 - 5 значений: k = 3, 4, 5, 6, 7.Для n = 3 - 4 значения, для n = 4 - 3 значения, для n = 5 - 2, для n = 6 - одно k = 7, для n = 7 - и одного.Всего положительных элементов массива 6 + 5 + 4 + 3 + 2 + 1 + 0 = 21