Есть ответ 👍

Укажи соответствие определений

298
497
Посмотреть ответы 1

Ответы на вопрос:


var

  s, a, n, i : longint;

begin

  read (a, n);

  s : = 1;

  for i : = 0 to n - 1 do

    s : = s * (a + i);

  writeln (s);

end.

Популярно: Информатика