Ввод 10 элементов , вывод только нечетные. язык - pascal abc

TimaWarface TimaWarface    2   08.09.2019 05:40    0

Ответы
lizadruzhinina1 lizadruzhinina1  07.10.2020 00:17
Var a: array [1..10] of integer; 
   i:integer;
begin 
for i:=1 to 10 do read(a[i]);
for i:=1 to 10 do if a[i] mod 2<>0 then write(a[i],' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика