:с > написать программу для нахождения четных элементов одномерного массива

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
  var a:=ArrRandom(10); println(a);
  for var i:=0 to 9 do
    if a[i] mod 2 =0 then print(a[i]);    
end.

Тестовое решение:
[57,42,71,42,53,88,86,80,87,74]
42 42 88 86 80 74