Программы на паскале. 1.из одномерного массива, состоящего из n целых элементов сформировать новый массив, состоящий только из положительных четных элементов больших 13 и меньших 23. 2. сформировать новый массив, состоящий сначала из положительных четных элементов больших 13 и меньших 23, а затем из оставшихся элементов.
begin
var a := ReadArrInteger(ReadInteger);
var b := a.Where(x -> x.isEven and x.inRange(13, 23)).Println.ToArray;
var c := a.Where(x -> not (x.isEven and x.InRange(13, 23)))
.Println.ToArray
end.