S=m*(m+1)(m+2)...(m+n) M,n натуральные , найти S

Var m,n,s,i: integer;
begin
  readln(m,n);
  s := 1;
  for i:=0 to n
    s := s * (m + i);
  writeln(s)
end.

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