Срочно экзамен! ПАСКАЛЬ,ЦИКЛ ПОМОГИТЕ ПЛИЗ!!!

Question

Срочно экзамен! ПАСКАЛЬ,ЦИКЛ ПОМОГИТЕ ПЛИЗ!!!

---

Answer 1

var

 proizv, k: integer;

begin

 proizv:=1;

 for k:=1 to 10 do

   proizv:=proizv*3*(k+1)/(7*k+9);

end.

По идее, так.