Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ekaterina7201
27.09.2020 05:32 •
Информатика
Вывести на экран значение n! , n – целое число, вводимое с клавиатуры.
Показать ответ
Ответ:
Lev1223
04.10.2020 07:44
Var
i, n: integer;
nf: longint;
begin
readln(n);
nf := 1;
for i := 1 to n do
nf := nf * i;
writeln(nf);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
тёмая
10.01.2020 06:18
Найти ответы на эту контрольную. или, может кто-то знает, как это сделать...
plkg
20.05.2020 09:37
Кто-нибудь сможет с по программированию (на любом языке)?...
nurikparik
19.11.2021 01:54
BONDOЧто будет напечатано в результате работы программы:a=3b= 4print(a+b)...
vans10004
02.01.2023 20:18
Вычислить длины сторон a, b, c прямоугольного треугольника, у которого длина одного катета в два раза больше длины другого, а площадь равна s....
DeStreudG
20.11.2020 07:54
Двоичные матрицы удобно использоватьдля решения некоторых логических -головоломок.попробуйте таким путем решить следующие . 1)имена иванова,петрова,семенова и николаева-иван ,петр,семен...
EvaPark1997
20.11.2020 07:54
решить. 1)перевидите числа в 10-ую систему счисления: 647( в восьмой степени), 111011011( во второй степени) 2е8 ( в шестнадцатой степени) 2) перевести число : 674 ( в десятой степени)...
говешка123
18.07.2020 03:12
Найти сумму кубов всех целых чисел от 20 до 40. ( написать программу в си++ )....
Kristino4kaMiy
27.04.2021 10:43
Сколько байт информации могут хранить 32 тригера? и как это расчитывать?...
маша3054
22.04.2020 18:49
Расшифровать послание,. это не относиться ни какому-либо предмету) 69705415673...
seidov05
23.10.2022 14:21
1. дана таблица гипотетической базы данных «»: формула кислоты название кислоты формула кислотного остатка валентность кислотного остатка название соли h2so4 серная =s04 ii сульфаты...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i, n: integer;
nf: longint;
begin
readln(n);
nf := 1;
for i := 1 to n do
nf := nf * i;
writeln(nf);
end.