Pascal abc, дано целое число n (> 0). найти сумму n2 + (n + 1)2 + (n + 2)2 + (целое число). решить через repeat
288
377
Ответы на вопрос:
Var n, i, s: integer; begin readln(n); s : = 2 * n; i : = 1; repeat s : = s + 2 * (n + i); i : = i + 1; until i > n; writeln(s); end.
ответ:Открыть общий доступ если на компьютере то в настройках папки , если через интернет то выложить на облачное хранилище или залить на сервер
Объяснение:
Популярно: Информатика
-
Куземченко20.12.2021 02:58
-
Артур300925.01.2022 16:14
-
Dash52806.05.2020 07:59
-
Yshenik205621.08.2020 08:38
-
Diana607929.05.2021 04:12
-
eliseevivan03.05.2020 11:33
-
Diman6666605.07.2020 21:42
-
dimaandreevich07.06.2020 15:14
-
svetlanko200002.01.2022 03:41
-
di180824.02.2021 01:34