Подсчитать количество нечетных элементов массива из 10 чисел. (С полным ответом! Pascal ABC)

April 2023 1 17 Report

Answers & Comments

Verified answer

Ответ:
var a: array [1..10] of integer;
i, j: integer;
begin
j:=0;
for i:=1 to 10 do
read(a[i]);
writeln;
for i:=1 to 10 do
if (not odd(a[i])) then inc(j);
writeln(j);
end.

1 votes Thanks 0

Answers & Comments

Verified answer

tex 649cbf1390f31

200 1 2 3 4 6498c72c1cdff

10 pascal abc 643cdfdb45bfd

pascal abc 7 15

pascal abc 1 10 2 10 3

10 pascal abc var program alex3212constn 10vara array1n

an pig box jam class bread bed vase star cheese lamp

1 1 2 63db842f85750

47931dc88259f38643d5e3e37ee966bd

parallelnyj perenos pomogite pozhalujsta kak chertit reshenie i otvet

Helpful Links

Helpful Social