(Паскаль) разработайте программу, определяющую количество нечётных чисел в целочисленном массиве из 17 элементов. массив заполнить любым способом и вывести на экран в одну строку
(Паскаль)
разработайте программу, определяющую количество нечётных чисел в целочисленном массиве из 17 элементов. массив заполнить любым способом и вывести на экран в одну строку
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы