// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(12,0,40); a.Println;
a.Where(t->t.IsEven).Println
end.
Пример
19 22 12 20 39 31 23 9 32 7 2 10
22 12 20 32 2 10
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.