Все элементы двумерного массива A размером 10х10 элементов первоначально были равны 0....

Question

Все элементы двумерного массива A размером 10х10 элементов первоначально были равны 0. Затем значения элементов меняются с помощью вложенного оператора цикла в представленном фрагменте программы:
for n:=1 to 4 do
for k:=n to 4 do begin
A[n,k]:=A[n,k]+1;
A[k,n]:=A[k,n]+1;
end;
Сколько элементов массива в результате будут равны 1?

Answer 1

Рассматривается матрица размеров 4х4, элементов будет 16. Пока все они равны нулю. При выполнении цикла получится следующее
2 1 1 1
1 0 0 0
1 0 0 0 
1 0 0 0
Далее:
2 1 1 1
1 2 1 1
1 1 0 0
1 1 0 0
Далее:
2 1 1 1
1 2 1 1
1 1 2 1
1 1 1 0
Ну и последний шаг:
2 1 1 1
1 2 1 1
1 1 2 1
1 1 1 2

Считаей единички. Их 12. Ответ 12