Какие действия выполняет данный фрагмент программы

[email protected] в категроии Информатика, вопрос открыт 28.12.2017 в 18:37

for i:=1 to 10 do
if A[i}>0 then k:=k+1;
writeln (k);
Пожалуйста помогите)