1. Информатика
  2. Программы на паскале. 1.из

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

sonatap01f6p sonatap01f6p    3   30.09.2019 01:10    0

Ответы
manetsevap010xz manetsevap010xz  09.10.2020 04:15

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.


Программы на паскале. 1.из одномерного массива, состоящего из n целых элементов сформировать новый м
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Miralis11 Miralis11  26.03.2020 12:41
Даны числа m1 = 2, m2 = 7, m3 = 9. Запишите числа u = 13 и v = 8 в модулярном представлении, выполните над ними операции сложения, вычитания, умножения и проверьте...
Cверхъестественное Cверхъестественное  26.03.2020 12:41
1) От разведчика было получено сообщение: 110011000011110100 В этом сообщении зашифрован пароль – последовательность русских букв. В пароле использовались только...
Настёна30072003 Настёна30072003  26.03.2020 12:38
Выберите в качестве модулей определенную совокупность чисел М. Мерсенна и разработайте программную реализа- цию операции умножения целых чисел....
эмсикалаш эмсикалаш  12.04.2020 16:04
Заполнить массив случайными числами в интервале [-80,70] и подсчитать сумму всех этих чисел. Нужна блок-схема, программу я написал(прикрепил к во...
Браснуев21 Браснуев21  03.10.2019 18:20
Построить таблицу истинности: (a\/ ¬b) /\ (¬a\/ b)...
marisha0606 marisha0606  03.10.2019 17:03
Произвести сложение (а) и умножение точек (б) е5(1,3) а) (1,5)+(4,1) б) 2*(4,1)...
юстина6 юстина6  18.07.2019 23:20
Wtite them before or after the letters in the boxes unit 7...
Sobennikovoleg Sobennikovoleg  18.07.2019 23:20
Запишите предложение с словосочетанием весеннею порой....
DmitriyGromov DmitriyGromov  18.07.2019 23:20
Расставьте знаки препинания в предложениях,назовите вводные слова. по убеждению библиофилов каждому необходимо знать хотя бы элементарные вещи о том, как пользоваться...
KatyaBelchik12 KatyaBelchik12  18.07.2019 23:20
Уамерики есть два друга, лучше которых нет и не было ни у одной другой нации. это — тихий океан и океан атлантический...

Популярные вопросы