Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
прнннр1
27.12.2020 07:30 •
Информатика
Написать программу для вычисления выражения: s=1! +2! +3! ++15!
Показать ответ
Ответ:
if395478
08.10.2020 08:24
Program pr1;
const n=8;
function factorial(n:integer):integer;
begin
if (n<=1) then factorial:=1
else factorial:=n*factorial(n-1);
end;
begin
WriteLn('n!=',factorial(n));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
danil200804
17.11.2020 05:24
Какими можно загрузить WordPress на локальный сервер? ...
Vov1111
12.02.2023 13:36
Что нужно знать перед установкой WordPress? ...
slepovairina9
30.11.2021 03:09
Для хранения текста в однобайтовой кодировке требуется 8 Кбайт. Сколько страниц займет этот текст, если на странице размещается 32 строки по 64 символа в строке? В качестве...
leraci2001
18.11.2021 16:27
Запись числа 46 в 10 десятичной степени в системе счисления с основанием n оканчивается на 1 и содержит 3 цифры. чему равно основание этой системы счисление n?...
uroolga
01.02.2022 07:04
Для кодировки 500 различных сообщении используют 4 последователных цветовых выспышки .лампочки скольких различных цветов должны использоваться при передаче?...
ibatulina03
14.04.2020 23:24
Зовнішній запам ятовуючий пристрій комп ютера який може зберігати найбільший обсяг даних? а) дискета б) флеш-пам ять в) жорсткий диск г) оптичний диск...
lyuda29m
03.02.2020 20:34
Пусть а=245 b=-435, c=35.126 что будет выведено на экран после выполнения следующих команд: a) write( a,b,c ) writeln ( c= ,c: 8: 1) b) writeln ( b= ,b: 6); write ((a+c): 9:...
SmertKiller
11.08.2022 23:01
Сделать: даны целые числа k, m, n. написать программу которая определяет верно ли что все три числа нечетные...
tanyatomeva81
11.08.2022 23:01
Какая операция не применяется для редактирования текста а)печать текста б)удаление в тексте неверно наборного символа в)вставка пропущенного символа г)замена неверно набранного...
lada48
08.11.2020 14:52
Объемные доли веществ в смеси при температуре 2000 ° C,%: 85,2СО2 для реакции 2СО2 ↔ 2СО + О2; Если 9.9СО женэ 4.9O2, если полное давление жэнь составляет 1.013 × 105 Па, a....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const n=8;
function factorial(n:integer):integer;
begin
if (n<=1) then factorial:=1
else factorial:=n*factorial(n-1);
end;
begin
WriteLn('n!=',factorial(n));
end.