Регистрация
delacourr
11.04.2023 06:05
Информатика
Есть ответ 👍

ДАНА ПРОГРАММА НА ОДНОМ ЯЗЫКЕ, НУЖНО НАПИСАТЬ В Pascal
Очень

169
226
Посмотреть ответы 1

Ответы на вопрос:

карольчик1
карольчик1
4,6(59 оценок)

Язык не указан, сделаю на PascalABC.NET 3.6.3:

begin

 var A := ArrRandom(10, -99, 99).Where(p -> p.IsOdd).ToArray;

 if A.Length > 0 then A.OrderDescending.Println else println('None')

end.

Популярно: Информатика