Ответы на вопрос:
Var a,b,c: integer; begin b: =0; for a: =1 to 100 do begin if (a mod 2 < > 0) then b: =a+b; end; writeln('сумма нечётных чисел в заданном диапазоне = ', b); end.
Популярно: Информатика
-
anjutaboyycova17.09.2022 21:37
-
SaneckTupit02.01.2021 01:12
-
Daniil6class09.08.2021 22:45
-
Nastyapetrushicheva06.01.2022 10:22
-
danatabilov07.05.2020 22:56
-
БЕРЕНА11.01.2020 10:25
-
ПятьПятьПять16.02.2022 19:36
-
ep097791272122.03.2021 05:37
-
21Demon2121.02.2023 07:32
-
cheropitan04.08.2022 23:31