Как сделать факториал в паскале?
24.03.2024, 23:04
84
Чтобы вычислить факториал числа в языке Паскаль, можно использовать следующую функцию:
- function factorial(n: byte): longint;
- var
- result: longint;
- begin
- result := 1;
- for i := 1 to n do
- result := result * i;
- factorial := result;
- end;
Эта функция принимает в качестве аргумента число n, для которого нужно вычислить факториал. Она использует переменную result, которая инициализируется значением 1.
Затем, при помощи цикла for, происходит итерация от 1 до n, и на каждой итерации значение переменной result умножается на текущее значение итератора i.
В конце функция возвращает результат вычисленного факториала.
Например, для вычисления факториала числа x и его вывода на экран можно использовать следующий код:
var
x: byte;
begin
writeln('Введите значение:');
readln(x);
writeln(x, '! is ', factorial(x));
end.
Результат вычисления факториала будет отображен на экране.
