Найдите произведения чисел из диапазона от а о в ( а <= в ) с шагoм h

Question

Найдите произведения чисел из диапазона от а о в ( а <= в ) с шагoм h

Answer 1

Pr:=1;
i:=3;
while i<=15 do<br>begin
pr:=pr*i;
inc(i,2);
end;