Заполните массив целыми случайными двузначными числами 2 и нечетные элементы и ввести новый массив -паскаль

Fromsay Fromsay    2   28.09.2019 20:50    1

Ответы
strongbbt strongbbt  27.08.2020 09:06
// PascalABC.NET 3.4.2, сборка 1806 от 30.09.2018

begin

 ArrRandom(ReadInteger('Кол-во элем. ='), 10, 99).Println.Select(t -> t.IsOdd ? t * 2 : t).Println;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика