Вывести на экран элементы массива, стоящие на нечетных местах, вычислить их сумму (в массиве 10 элементов, вводим их с клавиатуры.)

adelgabdrahman adelgabdrahman    2   06.06.2019 12:00    1

Ответы
etyan00 etyan00  06.07.2020 16:49
Var x:array[1..10] of integer;
i,n,s:integer;
begin s:=0;
for i:=1 to n do
read(x[i]);
for i:=1 to n do
if x[i] mod2=1 then s:=s+x[i];
writeln('s=,s);
readln;
readln
end.
Думаю так будет.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика