Ответы на вопрос:
Используем формулу суммы арефм прогрессии: begin writeln((1 + 25) div 2* 25); end.или цикл: var i, s: integer; begins : = 0; for i : = 1 to 25 doinc(s, i); writeln(s); end.
Var sum,k: integer; begin sum: =0; for k: =1 to 25 do sum: =sum+k; writeln(sum); end.
Популярно: Информатика
-
акниет0115.02.2023 11:41
-
Aleshchksuni21.10.2020 09:22
-
Sn1KeRS223.05.2020 04:08
-
додо704.04.2022 07:54
-
nagor190422.01.2021 00:58
-
АнтонХабаров06.07.2021 14:05
-
Sофушка02.11.2022 05:37
-
алекса14622.04.2020 19:36
-
Salat1205.03.2021 18:15
-
натик6510.08.2021 15:55