Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Simochka123
09.07.2020 19:12 •
Информатика
Составить программу вычисления произведения первых 7 натуральных чисел
Показать ответ
Ответ:
MaksimKim2005koreec
27.05.2020 00:24
var
i, e : Integer;
begin
e := 1;
for i := 1 to 7 do
e := e * i;
Writeln(e);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
polinas2005
22.05.2022 02:02
Рассматривается множество целых чисел, принадлежащих числовому отрезку [2057; 9414], которые удовлетворяют следующим условиям: − сумма последних двух цифр не равна 5; − не кратны 4,...
sonatap01f6p
05.11.2020 10:28
По какой причине желательно не называть файлы длинными именами? ?...
yanabutko
05.11.2020 10:28
Вычислите корни квадратног уравнения ax2+b+c=0...
дженни34
05.11.2020 10:28
Как называется мост включающий в себя контроллер оперативной памяти и видеопамяти...
dmmkuplinov
05.11.2020 10:28
Переведите число 61 из десятичной в двоичную переведите число 1110011100 из двоичной в десятичную переведите число 81 из десятичной в восьмеричную переведите число 106 из восьмеричной...
irunahruha
14.11.2022 04:43
Написать сочинение на тему компьютер и его влияние на человека по информатике...
smchnc2004
28.09.2022 05:52
Дано n = 10101011², м =ad16 найдите целое значение числа к, которое отвечает условно n...
qnorri
04.03.2021 19:40
Решите ! 1. для записи текста использовался 200-символьный алфавит. каждая страница содержит 96 строк по 48 символов. какой объем информации содержат 1280 страниц текста? 2. текст...
Lizavitafjfjsj
04.03.2021 19:40
Что такое електронна почта сообщение...
aishaolzhas
05.05.2021 13:02
Каждый файл имеет собственное имя и...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
i, e : Integer;
begin
e := 1;
for i := 1 to 7 do
e := e * i;
Writeln(e);
end.