Войти Регистрация Спроси ai-bota

вычислите p=(n+1)! (факториал)

Показать ответ

Ответ:

Kristina17217

05.10.2020 18:59

Program n1;
var n: integer;
function fact(x: integer ):real;
begin
if x=0 then fact:=1 else fact:=fact(x-1)*x;
end;
begin
readln(n);
write(fact(n+1));
end.

0,0(0 оценок)

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

yestarday23

19.12.2020 22:12

ответьте на 9 вопрос.Таблица.....

ДериПериКет

15.12.2020 03:29

Перевести числа из десятичной системы числение в твоичную систему счисление: б) 7260...

qwerfdsa2904

09.05.2022 02:06

нужно вассоздать электронную ведомость по образцу при приложения ms excel. рассчитать значения во всех ячейках. построить гистограмму и график.скиньте фаил с книггой в exel либо...

умниквопрос

31.03.2021 10:31

Напишите программу, которая вводит два целых числа и находит их произведение, не используя операцию умножения. учтите, что числа могут быть отрицательными. входные данные входная...

August333

23.12.2022 14:32

Массив a(10),если 5 элементов одномерного массива положительные то вывести сообщение условие выполняется иначе условие не выполняется ....

SvetLink

01.02.2020 03:32

Дана программа: program primer; vara,result : real; begin writeln( введите значения переменной a ); write( a= ); readln(a); result : = sqr((7+a)*3); writeln ( sqr((7+a)*3) , result:...

khekkp02n6r

26.03.2020 14:06

Сизиф играет сам с собой в такую игру. у него есть лестница из 100 ступенек, на каждой ступеньке написан ее номер – число от 1 до 100. на ступеньках с номерами 1, 100 и 92 лежат...

Kiss456

16.01.2020 23:55

нужно написать программу-игру, которая имитирует битву героя и дракона. Информация о ходе битвы должна выводиться в консоль. Программа пишется постепенно, каждый этап добавляет...

valetto

18.03.2022 09:23

Сколько музыкальных записей объемом 4Мб поместится на флеш-карту объемом 1Гб?...

tsukikokawaii

02.09.2022 04:48

Как написать программу? program tochka; var x, y: real; begin writeln ( Программа определения того, в какой координатной четверти лежит точка. Введите координаты точки через пробел...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку