Дана последовательность из n целых чисел. найти сумму нечётных элементов этой последовательности.
157
238
Ответы на вопрос:
Program work; var chisla: array [1..n] of integer; sum, i: integer; begin for i: =1 to n do begin if chisla [i] mod 2 < > 0 then sum: =sum+chisla[i]; end; writeln (sum); end.
Популярно: Информатика
-
loli4009.06.2023 00:59
-
sharoraupova1214.09.2020 14:25
-
sok271017.03.2022 21:35
-
соня1310114.01.2022 17:36
-
Математикаалгебра16.09.2021 05:24
-
adelinapak06.04.2022 20:10
-
ALINASVETLYRULIT14.11.2020 23:21
-
atimaus12325.05.2023 00:30
-
Sirota2028.01.2022 01:17
-
mun789019.05.2022 23:41