Задание 4 Параграф 24 ГДЗ Семакин 8 класс (Информатика)

program fac;
var
i, n, f: integer;
begin
write(‘N > > ‘);
readln(n);
f := 1;
for i := 2 to n do
f := f * i;
writeln(‘fac=’, f)
end.

Факториал числа $$N$$ — это произведение всех натуральных чисел от $$1$$ до $$N$$:

$$N! = 1 \cdot 2 \cdot 3 \cdot \ldots \cdot N$$

Чтобы вычислить факториал, удобно начать с $$f = 1$$ и последовательно умножать его на все числа от $$2$$ до $$N$$.

program fac;
var
  i, n, f: integer;
begin
  write(‘N >> ‘);
  readln(n);
  f := 1;
  for i := 2 to n do
    f := f * i;
  writeln(‘fac=’, f)
end.

В этой программе:

• $$n$$ — вводимое число;
• $$f$$ — переменная для хранения результата;
• цикл for перемножает все числа от $$2$$ до $$n$$.

Ответ

Программа вычисляет факториал числа $$N$$ с помощью цикла for.