Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
katyapugachewa
21.02.2021 18:51 •
Информатика
Как написать программу нахождения 10! (10! =1*2*3**10)?
Ответ:
Asimaaa
22.07.2020 08:57
Var
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
p:=p*i;
writeln('! = ',p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
masha2820
28.08.2022 03:14
Что выйдет на экране в результате выполнения a=( информация ,1,19,29)print (a)?1,19,29информация 1 19 29информация(информация , 1, 19, 29)...
Milana1117464
12.10.2020 16:05
Что означает знак %? В ПРОГРАММИРОВАНИИ ...
098473
11.09.2022 07:54
Какое-кол-во информации вы получили,когда увидели,что лампочка накаливания в комнате включена?...
lubovsalamatova
28.11.2021 18:45
Сформируйте массив, и выполните указанное в варианте действие. Пример входных данных для матрицы. Исходные данные записаны в файле input.txt в столбик. В первой строке записаны через...
malckowdanilр
08.12.2022 09:39
Какое число будет выведено в результате работы следующейпрограммы?var k, s: integer; begink : =1 ; S : = 0 ; repeat s:=s+k;k:=k+2; until k 8; writel n (s)end....
alena667
04.07.2022 15:21
автомобиль масой 4 т движется по горизонтальной дороге.его буксируют с троса жорсткостью 100 н/м.найдите удлинение троса,если за 3 секунды скорость его движения изменилось от 1 до...
ирпимрпмро
04.07.2022 15:21
Подскажите, , изотермы муссонного климата...
Angelina07111
04.07.2022 15:21
Плюсы и минусы личинок и куколок бабочек...
Соничка55555
04.07.2022 15:21
Написать сочинение 7 класс на тему тарас бульба - народный герой....
Лейла0044
04.07.2022 15:21
Какие эти предложения спп,сспили бсп-луга купаются в тумане и пахнут звёзды молоком. скоро осень проснётся и заплачет спросонья. если внимательно изучать правило,то можно научиться...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
p:=p*i;
writeln('! = ',p);
end.