Войти Регистрация Спроси ai-bota

P:=0; a:=2; for i:=1 to 5 do begin a:=3*a+1; p:=p+a; end;

Ответ:

kristya0414

16.04.2021 14:20

Решение представлено во вложении.

Язык: Pascal

a = 607;p = 905.
P:=0; a:=2; for i:=1 to 5 do begin a:=3*a+1; p:=p+a; end;

P:=0; a:=2; for i:=1 to 5 do begin a:=3*a+1; p:=p+a; end;

0,0(0 оценок)

Популярные вопросы: Информатика

baburinyaroslav

25.10.2022 09:22

Информатикатут нужно выбрать либо да или нет...

alyamiller1513

17.05.2022 02:36

Выражение на языке Паскаль: sqrt(sqr(x)−8∗x+7). Данное выражение на математическом языке: √x2−8x+7 ∣∣x2−8x+7∣∣ √5x2−8x+7 (x2−8x+7)2...

ksenia20062

30.05.2021 14:00

После выполнения команды присваивания x: =x+y значение переменной x равно 9, а значение переменной y равно 15. чему были равны значения переменных x и y до выполнения указанной...

KarinaMalfoy08

23.04.2023 05:36

ответ нужен сегодня. дана последовательность 5 9 13 17 составьте программу алгоритма для подсчета числа слагаемых, сумма которых равна 324....

sehya72

23.04.2023 05:36

Какому виду системы объектов относится компьютер материальные системы природные системы нематериальной системы смешанные системы...

gribovskayairi

29.07.2021 00:54

2a16 в десятичную систему счисления заранее...

Умник333331

29.07.2021 00:54

Сколько секунд потребуется модему, сообщения со скоростью 128000 бит/с, чтобы передать сообщение объёмом 236 кбайт? !...

sofija97

06.02.2021 11:29

Как ты можешь объяснить влияние использования эффекта кривые RGB При редактировании цвета изображения...

Димон20143

17.05.2020 18:23

Для какого из названий животных ложно высказывание: (Претья буква гласная) и (Заканчивается на гласную букву)и (В слове6 букв)? 1) Пума 2) Леопард 3) Кенгуру 4) Страус...

мария2388

18.01.2023 04:19

надо что бы таблица вела учет новых заявок которые внесли сегодня ,и так каждый день .Что бы только те данные какие сегодня были внесены те и считались .а завтра по новой с нуля,какая...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку