Массив содержит значения А={4,3,8,2,5,7,3,6,9,1,11}.
Дан фрагмент программы, определить результат его выполнения:
p:=1;
For i:=1 to 11 do begin If (a[i]<=5) then p:=p*a[i] End;
Writeln(‘p=’,p);