Дана последовательность, расположить ее элементы, кратные 3, по убыванию.(паскаль)

jdkdjdjjidjdjd jdkdjdjjidjdjd    3   21.11.2019 20:05    0

Ответы
airamoon airamoon  27.08.2020 16:52

===== PascalABC.NET =====

begin

 var n := ReadInteger('Число элементов =');

 var a := ArrRandom(n, -99, 99);

 a.Println;

 a.Where(p -> p mod 3 = 0).OrderDescending.Println

end.


Дана последовательность, расположить ее элементы, кратные 3, по убыванию.(паскаль)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика