Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
McGohanskii
20.06.2020 18:11 •
Информатика
Составьте программу, вычисляющую произведение чисел от 1 до 5.
Ответ:
Lizamog1
02.10.2020 20:47
Var p:integer;
i:integer;
begin
p:=1;
for i:=1 to 5 do
p:=p*i;
writeln(p);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Совунья11
27.01.2022 17:41
Как получить данные от пользователя?...
Аделя0504
14.01.2022 18:51
3. Составь программу для решения задачи: В коробке было х конфет. Толя взял 1/8 от этого количества, Маша – 1/10. Сколько конфетосталось в коробке? ( ) очень сросно...
саня1362
07.10.2022 02:20
Что выведет следующий фрагмент кода x=4.5 y =2 print(x // y)...
KseniaEnrrgy
17.12.2022 22:09
Что такое транслятор... A) Специальная программа, которая преобразует программный код на данном языке программирования в машинный код.Б) Набор символов, используемых...
asdfghjkl6tygb
10.10.2020 21:22
с математическим выражением...
vikammirkushaoz9agx
13.05.2022 19:39
Напишите программу, которая запрашивает 5 натуральных чисел, и определяет, сколько из них нечётных. Числа подаются одной строкой через пробел....
igordergaysov
06.08.2021 12:38
Что такое сортировка массива...
AnonimkaNya
06.03.2022 01:46
2. Алфавит языка – это … A. Набор символов, которые используются для создания элементов программыB. Набор правил языка, который должен сохраняться при написании программыC....
Даріна11111111
03.10.2021 11:31
Как повысить скорость движения по черной линии во время соревнование...
polo73oye61z
16.04.2023 00:29
Покажите запись следующих математических выражений на языке программирования:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i:integer;
begin
p:=1;
for i:=1 to 5 do
p:=p*i;
writeln(p);
readln;
end.