Элементы массива D (размерностью 10×10 элементов) равны 0. Укажите количество элементов массива, больших 1, после выполнения данного фрагмента программы.
for n:=1 to 4 do
for k:=n to 4 do begin
D[n,k]:=D[n,k]+1
D[k,n]:=D[k,n]+1
End;
1)1
2)2
3)3
4)4

Ответ: 4

Пояснение:

1)построил массив 10 на 10

2) выполнил все циклы по очереди и отмечал в каждой клетке полученное число после выполнения цикла