Написать программу, которая вычисляет факториал числа, введенного с клавиатуры, используя цикл с постусловием. язык - pascal

9 Июн 2020 в 19:40
155 +1
0
Ответы
1

program Factorial;
var
number, i, factorial: integer;
begin
writeln('Введите число для вычисления факториала:');
readln(number);

factorial := 1;
i := 1;

repeat
factorial := factorial * i;
i := i + 1;
until i > number;

writeln('Факториал ', number, '! = ', factorial);
end.

18 Апр 2024 в 11:11
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир