Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
AlinaNeizvestnaya20
16.09.2021 15:51 •
Информатика
Описать функцию fact (n) вещественного типа вычисляющую значение факториала n! =1*2*3*..*n (n> 0, параметр целого типа). с этой функции найти факториалы пяти данных целых чисел.
Показать ответ
Ответ:
Bogatuk2005
10.07.2020 23:17
Вот программа:
var
x:integer;
function Fact(n:integer): integer;
var
i,sum:integer;
begin
sum:=1;
for i:=1 to n do
sum:=sum*i;
result:=sum;
end;
begin
readln(x);
writeln(Fact(x));
end.
>С этой функции найти факториалы пяти данных целых чисел.
- Вы не написали каких чисел
0,0
(0 оценок)
Популярные вопросы: Информатика
snoopy201
22.02.2020 00:28
Укажите обьект, который является абонентом сети...
lsllalap
12.02.2022 12:57
Как узнать верные ответы для тестовой работы в exel?...
lerasifr
27.05.2021 04:21
Какой объем памяти необходим для хранения звукового файла длительностью 2 минуты 26 секунд при частоте дискретизации 55 кГц и 8-битном квантовании? В ответе записать число, выраженное...
EZno
28.05.2021 14:47
Какой объем памяти необходим для хранения звукового файла длительностью 39 секунд при частоте дискретизации 63 кГц и 16-битном квантовании? В ответе записать число, выраженное...
ihorrubalko
13.11.2022 21:13
С; практическая работа «поиск информации в сети интернет» используя любую поисковую систему и правильно оформляя запросы, найдите необходимую информацию и ответьте на следующие...
Darvin2004
23.06.2022 12:43
Составьте в словесной или графической формах алгоритм: нахождение большего из двух чисел...
sunriseliva
04.04.2022 02:32
5 Есепті шығар. Кері есеп құрастыр. Саяжай жерінің ұзындығы – 54 м, ені - 45 м. Жер телімініңбөлігіне - бұта, ал қалған бөлігіне көгеніс отырғызылған5Жер телімінің қанша квадрат...
КекЛолКарвалол
05.09.2020 10:51
Как называется в опере главная характеристика героя? а)либретто б)ария в)речетатив...
artem876
06.05.2022 18:31
Ребят по геометрии соч надо даюкто напишет не по теме бан ...
LikaKostukova
25.06.2021 04:17
4.Найдите предложение в котором содержится аргумент в пользу физической культуры....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
x:integer;
function Fact(n:integer): integer;
var
i,sum:integer;
begin
sum:=1;
for i:=1 to n do
sum:=sum*i;
result:=sum;
end;
begin
readln(x);
writeln(Fact(x));
end.
>С этой функции найти факториалы пяти данных целых чисел.
- Вы не написали каких чисел