Question

Даны действительное число а и натуральное число n. Вычислить выражение a(a+1)...(a+n-1)

Answer 1

program a;
var a,p:real;
 i,n:integer;
begin;
readln(n);
readln(a);
p:=1;
for i:=0 to n-1 do
 p:=p*(a+i);
writeln(p);
end.

вот ,сори если не правильно давно не решал)))

Answer 2

Сенки братан, очень тебе благодарен))