Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ДарьяOver
03.06.2021 22:46 •
Информатика
Сиспользованием цикла while do составить программу,которая рассчитывает выражение в=m(m++m) в случае целого числа m
Ответ:
Sagi511
21.06.2020 10:54
Readln(m);
rez:=1;
while (i<=m) do
begin
rez:=rez*m;
inc(m);
inc(i);
end;
write(rez);
0,0
(0 оценок)
Популярные вопросы: Информатика
bananchik9
07.06.2020 00:21
На основании чего можно утверждать, что в файловой системе возникла ошибка? Дан фрагмент FAT (считаем, что нумерация блоков идет с 1):...
DEGoP
22.02.2021 16:08
Дан одномерный массив. Запиши верный ответ. (Считай индексы элементов массива начиная с 1.) −18 36 0 −1 4 11 Значение элемента массива — 36. Индекс элемента массива —...
viktorrudnik53
11.03.2023 09:01
Розподіліть дані за типами величину Python...
milana0372milana
14.10.2022 04:47
Фотография Кремля хранится на компьютере по адресу...
yuliyabondar2
01.07.2022 15:37
Необходимо вычислить в Excel 934−32 . Запись в MS Excel выглядит следующим образом: 934()32 =934−32 −934−32...
Варя0601
06.02.2021 09:22
1. Упорядочите количество информации по возрастанию: 100 бит 1 байт 1000 килобайт 10 мегабайт 2.Решите задачу и установите соответствие. Сообщение из 64 символов, записанно...
Sofa1351
19.11.2020 23:58
Определите количество единиц в двоичной записи числа 4^52+2^54-2^28...
ХочуЗнатьВсе1
25.04.2023 23:58
Система счисления - это......
AlesyaDreamer
24.03.2020 18:46
Дополни математическое выражение-100=11...
driftsmuk1
08.02.2021 15:58
На стороне ВС треугольника АВС отмечена точка M так, что BM:MC=3:10. В каком отношении отрезок АМ делит медиану ВК треугольника АВС ? мне только рисунок к этой задачи,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
rez:=1;
while (i<=m) do
begin
rez:=rez*m;
inc(m);
inc(i);
end;
write(rez);