Массив А вводиться с клавиатуры. вывести только нечетные элементы. размер произвольный. решение паскаль

Question

Информатика

Аннуша

31 января, 18:54

Массив А вводиться с клавиатуры. вывести только нечетные элементы. размер произвольный. решение паскаль

+4

Ответы (1)

Знаете ответ?

Сигизмунд · Answer 1

Uses crt;

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

n:integer;

i:byte;

begin

for i:=1 to 5 do begin

read (a[i]) ;

writeln;

end;

for i:=1 to 5 do begin

if a[i] mod 2 0 then

writeln (a[i]) ;

end;

end.