6 lines
201 B
ObjectPascal
6 lines
201 B
ObjectPascal
// 3.11.1. Метод расширения None - ни один из элементов не удовлетворяет условию
|
|
|
|
begin
|
|
var a := Arr(1,2,3,4);
|
|
a.None(x -> x > 5).Print
|
|
end. |