program pole;
uses  crt;
const max_pola=100;
var i,n :integer;
    a: array[1..max_pola]of integer;
begin
  writeln('Zadaj pocet prvkov pola');
  readln(n);
  for i:=1 to n do
    begin
      write('Zadaj ',i,'. prvok: ');
      readln(a[i]);
    end;
  writeln('Tu su z nich vsetky neparne:');
  for i:=1 to n do
    if a[i] mod 2 = 1 then writeln(a[i]);
  readln;
end.