Ответы на вопрос:
Var a: array[1..100000] of integer; n, i,sum: integer; begin write('введите количество элементов массива -> '); readln(n); write('введите массив -> '); for i: = 1 to n do begin read(a[i]); if a[i] mod 2 = 1 then sum : = sum + a[i]; end; writeln(sum); end. пример: введите количество элементов массива -> 5 введите массив -> 1 2 3 4 5 9
Популярно: Информатика
-
seredaromaxa12.03.2023 11:31
-
nagornayka6905.05.2023 08:28
-
mashaa266018.01.2022 13:30
-
marinastolarova28.11.2022 06:58
-
balasanyansilva23.04.2022 16:45
-
uldairuslanova27.08.2022 17:41
-
NastyDi200724.02.2020 21:24
-
Alinka50550517.06.2020 04:02
-
iga511.12.2021 22:27
-
kolody71p0aje803.03.2023 14:42