Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
12312312712
01.09.2022 00:05 •
Информатика
N— натуральное число. вычислить (pascal). использовать цикл в цикле.
Показать ответ
Ответ:
fnabtr4ui26986
03.10.2020 03:14
Var
i, j, n, sum, mult: integer;
begin
read(n);
for i := 1 to n do
begin
mult := 1;
for j := 1 to i do
mult := mult * i;
sum := sum + mult;
end;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ZhannaMeer
05.03.2021 07:56
Вычислить значения синусов в интервале от 0 до 6.283, шаг 0,31415. всё надо сделать в паскале. если не сложно объясните...
taisia20061
21.04.2020 10:07
Вкниге, написанной на языке 68 страниц. на каждой странице 45 строк. в каждой строке 20 символов какое количество информации будет утеряно из книги и какое останется, если в ней...
mchermakov17
13.08.2020 07:50
Просто лень читать порагроф...
alenasamok
25.04.2023 06:31
Исключите лишнее, обоснуйте ваш выбор fecl3, fecl2, bacl2, na2so4, cucl2...
crasnowdim2018
25.04.2023 06:31
Что такое доминанта и как она проявляется?...
sasha3637
25.04.2023 06:31
Выполнить : твой одноклассник не смог пойти с классом в парк. он звонит тебе по мобильному телефону. запиши его вопросы о ваших одноклассниках и ответь на них. образец: what is...
morshchininao
25.04.2023 06:31
Подчеркните словосочетания, отметьте крестиком главное слово. прекрасный день, по дороге, писать письмо, говорить громко, вокруг дома, идти в колледж, три сестры, старый деревянный...
ErkeSapieva
25.04.2023 06:31
2\3*(4,5х-9\16у)-1,8*(5\9х+25\72у) заранее)...
лщутлзутсзо
25.04.2023 06:31
Что происходит с размером озёра байкал?...
5757azfffgghhhj
25.04.2023 06:31
Впроизводных основах данных слова выделите словообразовательные морфемы и запишите цепочкой от производной к производящей основе. образец: грузовик - грузовой - груз лесовичок,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i, j, n, sum, mult: integer;
begin
read(n);
for i := 1 to n do
begin
mult := 1;
for j := 1 to i do
mult := mult * i;
sum := sum + mult;
end;
writeln(sum);
end.