Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
LimOonka
31.01.2023 21:36 •
Информатика
Составить программу дано целое число n (> 0). найти произведение 1 · 2 · 3 · …(n сомножителей).
Ответ:
мэривип
08.10.2020 01:15
Var x,y,z:integer;
Begin
Read(x);
z:=1;
For y:=1 to x do z:=z*y;
Write(z);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
taisechka
07.10.2020 11:07
Слово зашифровали, переставив некоторые его буквы. получилось слово котбуун. найдите исходное слово....
sonashkumatova
16.10.2020 08:05
Довжина двійкового коду текстового повідомлення становить 8.192 біти. виразіть це значення в кілобайтах...
honeybeyker
20.01.2020 23:27
Как вы представляете информационное общество? является ли наше общество информационным? обоснуйте ответ....
LizaIsaeva197
28.07.2020 08:37
Общие свойства объекта и модели ребенок-кукла...
дошикестдошик
30.09.2021 18:29
Исполнитель робот находится в верхнем левом углу чистого клетчатого поля 10х15. сколько клеток будет закрашено, после выполнения алгоритма, состоящего из двух команд: фигура; фигура....
irinacoroleva
05.04.2020 13:46
Составить блок схему: найти площадь и периметр прямоугольника...
MRLamaKing
31.12.2020 13:29
Цифровой аудиофайл (моно) имеет продолжительность звучания 1 минута. при этом он занимает 2,52 мбайт. с какой частотой дискретизации записан звук, если разрядность звуковой платы...
Алина777начарова
14.04.2022 20:22
Вклассе в первом полугодии было 5 отличников,10 ударников и 10 троечников,двоечников нет.во втором полугодии стало 3 отличника и 7 ударников без двоечников.сколько процентов троечников...
stevarmen
14.04.2022 20:22
Может ли человек заразиться компьютерным вирусом? да; нет; да, если вирус особенный....
ZKRMT
14.04.2022 20:22
Дайте определения- редактирование текста , буфер обмена , обработка информации...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Begin
Read(x);
z:=1;
For y:=1 to x do z:=z*y;
Write(z);
End.