Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Duka2003
19.01.2023 03:07 •
Информатика
Вычислить произведение n-сомножителей p=1*2**10=10!
Ответ:
nastyan00
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 оценок)
Популярные вопросы: Информатика
fhgghj
19.11.2020 23:04
, да я тупой но... Как ответить на вопрос в знания ком?...
roma2233p08v96
02.01.2020 01:36
Напишіть програму мовою Pyhton находження середнього числа для чотирьох чисел?...
horan66
03.01.2022 17:59
Вычислить сумму 1+x1/1!+x2/2!+x3/3!+…+xn/n!,где k!=1*2*3*...*k . Значение n вводится с клавиатуры (1 ≤ n ≤10)....
cleverprincess
28.06.2022 21:24
Вячейках excel расположены 10 элементов одномерного массива.вычислить среднее арифметическое нечетных элементов.vba....
AliskaLao16
28.06.2022 21:24
Help! сколько по объему( в килобайтах) будет занимать цветное изображение (512 цветов) размером 960*680...
123456Вопрос654321
11.08.2020 06:54
Есе на тему японська культура поезія ...
DanielFray
24.09.2021 10:13
1жасым ,2ерекеше,3жұмыс,4жастар,5орындалды это ответ на вопрос Бос орынды толықтыр. Алғаш Нұр-Сұлтанға келгенде менің 16-да еді. Мен бұл қаланың ғимараттары мен кеңселеріне қызықтым....
Smartfone
01.06.2022 21:20
Привет решить Даны точки M(2; 3), P(-2; 0), O(0; 0), K(-5; -12), R(4; у). а) Найдите координаты векторов МР и ОК. б) Найдите длины векторов МР и ОК. в) Найдите скалярное произведение...
kintel1
16.03.2022 22:43
Мәтінді мұқият оқып төмендегі тапсырмаларды орындаңыз тіршіліктің көзі.Психолог ...
geamget
17.08.2021 08:34
Що робити зі степенями? 10⁵+10⁴...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
p:=1;
readln(n);
for i:=1 to n do
p*=i;
writeln(p);
end.