Составить программу ввода с клавиатуры и вывода на экран элементов с чётными отрицательными значениями.
begin
ReadArrInteger(ReadInteger('n=')).Where(t->(t.IsEven) and (t
end.