Question

Составить программу ввода с клавиатуры и вывода на экран элементов с чётными отрицательными значениями.

Answer 1

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

begin

 ReadArrInteger(ReadInteger('n=')).Where(t->(t.IsEven) and (t<0)).Println;

end.