В программе описан одномерный целочисленный массив с индексами от 0 до

В программе описан одномерный целочисленный массив с индексами от 0 до 9. Ниже представлен кусок программки, обрабатывающей данный массив: n := 9; for i:=0 to n do begin K := A[i]; A[K] := 0; end; В начале исполненья этого куска в массиве находились числа 9,8,7,6,5,4,3,2,1,0 т. е. A[0] = 9, A[1] = 8 и т. д. Сколько частей массива после исполнения программки будут иметь ненулевые значения?