СРОЧНО
дан массив из 20 элементов определить сумму 5-ти наибольших чисел

Ответ

Автор - BobbyFresnel

begin

ArrRandom(20,-100,100).Println.

OrderDescending.Take(5).Sum.Println

end.

На PascalABC.NET

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.