Question

Что будет результатом выполнения фрагмента программы: k:=0; For i:=1 to n do if a[i]>0 then k:=k+1;