х = 0; у = 0; К не забыть начальные условия! )
for i=1 to n do
if All > 0 then begin
Х: Х + 1;
y=y+A[0]
end;
s: у Іх,
определить что считает данная программа​