Определите ,количество каких элементов подсчитывается в следующем фрагменте программы :
k:=0
For i:=1 to 10 do
If a [i]>50 then k:=k+1
Write (`k=`,k)