Даны действительное число а и натуральное число n. Вычислить. Задача на паскале!!
p=a(a+1)...(a+n-1)

n=3
p=a(a+1)*(a+2)

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

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.