Question

se da un tablou cu n componente numere intregi.Afisati componentele cu indicii ce au valoare para. In Pascal va rog mult

Answer 1

var

 a:array of integer;
 i,n:integer;
 
begin

 read(n);
 setlength(a,n);
 writeln;
 
 for i:=0 to n-1 do
  read(a[i]);
  
 writeln;
 
 for i:=0 to n-1 do
  if Not odd(a[i]) then writeln(a[i],' ',i+1);

end.