Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Slash213
27.10.2021 13:57 •
Информатика
Вычислить произведение n-сомножителей p=1*2**10=10!
Показать ответ
Ответ:
Brozuca
05.07.2020 09:31
Var i,p,n:integer;
begin
p:=1;
readln(n);
for i:=1 to n do
p*=i;
writeln(p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
katirina61171Rfn
13.06.2022 15:03
Psckal решите задачу ...
sanzik2005
20.03.2022 07:37
для чего нужен язык программирования Python? ( )...
shahnozat02
06.06.2023 12:18
На Сколько градусов повернется робот по часовой стрелке 45, 3, 10, -10...
dasha5010
22.01.2020 14:38
на вході маємо 2 числа (наприклад а i b). Програма повиннавиконати дії: за до функцій модуля math. Результат вивести на екран;на вході маємо число, яке є радіусом певного...
zzubaidulloieva
17.01.2022 00:43
Циклы с предусловием 1.Составить программу вывода 10 целых чисел на экран....
Исбанка
17.07.2020 09:50
Соответствие между арифметическими операциями и их назначением Round (x) Вычитание из корня sqrt (x) x не равно 1 abs (x) приближение к целому числу x = 1 вычитание...
olafff9461
11.10.2022 22:59
Каковы части окна программы Lazarus? Меню среды программирования Lazarus, Инспектор объектов, Панель компонентов, Панель инструментов,Простая форма проекта, Форма проекта....
ПавелКрут
30.11.2022 08:39
Рассмотрите элементы блок-схемы алгоритма. Установите соответствие ЦиклНачало и конецДействиеRO...
oliver9999
02.05.2023 05:13
Найдите сумму N-количества элементов ряда 1; 0,5; 0,25; 0,125...
lebedeva2303
31.10.2020 08:56
Берілген алгоритм бойынша скрипт жазыңыз...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
p:=1;
readln(n);
for i:=1 to n do
p*=i;
writeln(p);
end.