Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
butera
20.06.2020 10:20 •
Информатика
Напишите функцию, которая вычисляет факториал натурального числа n (pascalabc)
Показать ответ
Ответ:
Алeна1
03.07.2020 13:29
Function factorial(n:integer):integer;(или longint, если n большое)
i,ch:integer;
begin
ch:=1;
for i:=1 to n do
ch:=ch*i;
factorial:=ch;
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
Fulfevgen
20.01.2023 00:38
Условие : дана непустая последовательность непустых слов из латинских букв; соседние слова отделены друг от друга запятой, за последним словом – точка. определить количество...
pochta147369
20.01.2023 00:38
Сколько содержит выделенная область b3: d4? 1) 6; 2) 7; 3) 8; 4)9....
tatiana85gandzii
23.02.2023 23:08
Вычисли результат следующего фрагмента кода. n = 10sum = 0i = 1while i = n:sum = sum + ii = i + 1print( The sum is , sum)545010550...
Pomogite23102017
06.12.2021 23:43
1. Найдите ошибку в приведенном фрагменте программы i = 0 whilе i 10 print(i= , i)...
H1biki
14.02.2020 15:19
Впрямоугольном треугольнике угол между высотой и биссектрисой, проведенными из вершины прямого угла равен 34°. найдите меньший угол данного треугольника....
денисвеликий
14.02.2020 15:19
Одноатомный газ при неизменном давлении р=80 кпа нагревается. его объем увеличивается от v1=1 м3 до v2=3 м3. определить изменение внутренней δu энергии газа, работу а, совершаемую...
Ульяна11111112
14.02.2020 15:19
Биссектрисы углов a и d трапеции abcd пересекаются в точке m, лежащей на стороне bc. докажите, что точка m равноудалена от прямых ab, ad и cd. (полное решение + рисунок)...
sabserj
14.02.2020 15:19
Состояние воды,при котором расстояние между молекулами наибольшее.( 3 клеточки)...
ZheniaBabich
04.11.2020 13:04
2) машина ехала со скоростью 120 км/ч. около поста дпс она сбросила скорость на 25 %. с какой скоростью проехала машина мимо поста дпс?...
yakirill0109200
04.11.2020 13:04
Напишите краткое содержание тургенева ася буквально 6-7 предложений....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,ch:integer;
begin
ch:=1;
for i:=1 to n do
ch:=ch*i;
factorial:=ch;
end;