Регистрация
даная7234598
04.04.2022 06:13
Информатика
Есть ответ 👍

Эргономика кай жылы гылым ретинде​

237
293
Посмотреть ответы 2

Ответы на вопрос:

Dvoeshnik666
Dvoeshnik666
4,7(3 оценок)

hfghfhgfhfg

Объяснение:

drdnsv
drdnsv
4,4(45 оценок)

const n = 20;

var a: array [1..n] of integer;

i,s: integer;

begin

for i: =1 to n do read (a[i]);

writeln('элементы массива: ');

for i: =1 to n do

begin

write(a[i],' ');

if a[i] mod 2 < > 0 then s: =s+a[i]

end;

writeln;

writeln ('сумма элементов имеющих нечётное значение равна ',s)

end.

Популярно: Информатика