Выести одномерной размерностью n и посчитать в нем сумму нечетных чисел в
212
266
Ответы на вопрос:
Var s,i,a,b: integer; begin writeln('введите a и b'); readln(a,b); s: =0; for i: =a+1 to b-1 do if (i mod 2< > 0) then s: =s+i; writeln(s); end.
Популярно: Информатика
-
576531468019.12.2022 22:26
-
Xela93606.12.2021 09:49
-
Manasyan8514023.01.2023 19:28
-
ArtemFediroolosb17.08.2021 00:31
-
rustie04.10.2021 10:52
-
SofaCat123122.10.2022 14:16
-
dina5364615.07.2020 03:05
-
kalinka2002021oxuybb09.06.2020 18:31
-
hfyvjfarioS04.05.2021 14:32
-
Деля236308.10.2021 00:32