Программы на паскале.

1. Из одномерного массива, состоящего из n целых элементов сформировать новый массив, состоящий только из положительных четных элементов больших 13 и меньших 23.

2. Сформировать новый массив, состоящий сначала из положительных четных элементов больших 13 и меньших 23, а затем из оставшихся элементов.

Question

Информатика

Уриил

29 января, 09:30

Программы на паскале.

1. Из одномерного массива, состоящего из n целых элементов сформировать новый массив, состоящий только из положительных четных элементов больших 13 и меньших 23.

2. Сформировать новый массив, состоящий сначала из положительных четных элементов больших 13 и меньших 23, а затем из оставшихся элементов.

+3

Ответы (1)

Знаешь ответ?

Мухамедали · Answer 1

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.