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

Вопрос школьника по предмету Математика

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

Ответ учителя по предмету Математика

pr:=1;

i:=3;

while i<=15 do

begin

pr:=pr*i;

inc(i,2);

end;