(паскаль) разработайте программу, определяющую количество нечётных чисел в целочисленном массиве из 17 элементов. массив заполнить любым способом и вывести на экран в одну строку
103
191
Ответы на вопрос:
Var a: array[1..17] of longint; n,i,j: longint; begin for i: =1 to 17 do begin read(a[i]); if odd(a[i]) then inc(n); end; writeln(n); end.
Популярно: Информатика
-
Катрин70306.06.2020 12:59
-
adonnush17.05.2023 16:32
-
Danil11111223.04.2023 10:12
-
Janys12319.06.2021 21:38
-
sxmax18.02.2023 16:20
-
8888щоолзлтлжд04.07.2021 21:47
-
volkovaales030812.03.2021 11:39
-
jdjsjsjsj13.08.2020 12:16
-
Avry9929.08.2022 09:30
-
jenjenle21.12.2022 00:25