факториал в паскале
Автор Анна Бельская задал вопрос в разделе Другие языки и технологии
Факториал в паскале) и получил лучший ответ
Ответ от Достоевский и мозжечок[гуру]
Нет. Встроенной нет. function Factorial(n: word): LongInt; begin if n=0 then Factorial := 1 else Factorial := n*Factorial(n-1); end; или function Factorial(n: word): LongInt; var fact: longint; begin fact := 1; if n=0 then exit; for n := 1 to n do fact := fact*n; Factorial := fact; end;
Ответ от Alexander Grachev[гуру]
program alexq; uses crt; var y: double; i,n: integer; begin clrscr; y:=1; write('n->'); readln(n); for i:=1 to n do y:=y*i; writeln('otvet: ',y:15:0); readkey; end.
program alexq; uses crt; var y: double; i,n: integer; begin clrscr; y:=1; write('n->'); readln(n); for i:=1 to n do y:=y*i; writeln('otvet: ',y:15:0); readkey; end.
Ответ от F f[гуру]
ты сама можешь написать эту функцию - и потом ее использовать для всех чисел -
ты сама можешь написать эту функцию - и потом ее использовать для всех чисел -
Ответ от Максим Рясков[гуру]
Как таковой нет! Надо самой написать эту функцию.
Как таковой нет! Надо самой написать эту функцию.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Факториал в паскале)
спросили в Рекурсия
Как в Pascal записать нахождение факториала?
1) Вычисление факториала в pascal с помощью цикла
Данный способ нахождения факториала
подробнее...
Как в Pascal записать нахождение факториала?
1) Вычисление факториала в pascal с помощью цикла
Данный способ нахождения факториала
подробнее...
спросили в X PRIZE
Помогите написать программу для нахождения синуса числа в паскале?
Если имеется ввиду, что нельзя использовать стандартную функцию, то
Разложение синуса в ряд
подробнее...
Помогите написать программу для нахождения синуса числа в паскале?
Если имеется ввиду, что нельзя использовать стандартную функцию, то
Разложение синуса в ряд
подробнее...
В Паскале. Напишите программу для вычисления факториала с использованием оператора цикла с параметром.
Ещё 0!=1 нужно учитывать.
F := 1;
if N>0 then
for i := 1 to N do F := F * i;
подробнее...
Паскаль... Хелп 🙂 Составить программу для вычисления бесконечной суммы 1+1/(1!)+1/(2!)+1/(3!)+...+1/(n!)+...
SUM=1
Цикл от 1 до n, где вычисляется SUM=SUM+1/FUN(n)
Функция FUN(n) вычисляет факториал
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
спросили в Железо
Как выглядел самый первый персональный компьютер?
Разработка первой электронной серийной машины UNIVAC (Universal Automatic Computer) начата примерно
подробнее...
Как выглядел самый первый персональный компьютер?
Разработка первой электронной серийной машины UNIVAC (Universal Automatic Computer) начата примерно
подробнее...
спросили в Двигатель
Объясните, пожалуйста, популярно, что такое компрессия применительно к двигателю автомобиля?
Значит так, чтобы не было неразберихи.
Степень сжатия - это отношение объёма цилиндра к
подробнее...
Объясните, пожалуйста, популярно, что такое компрессия применительно к двигателю автомобиля?
Значит так, чтобы не было неразберихи.
Степень сжатия - это отношение объёма цилиндра к
подробнее...