Срочно нужна ваша помощь!)) дан массив A[1..15], элементы массива - случайные числа, принадлежащие промежутку [10;120], найти сумму чисел от максимального до последнего
Срочно нужна ваша помощь!)) дан массив A[1..15], элементы массива - случайные числа, принадлежащие промежутку [10;120], найти сумму чисел от максимального до последнего
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,10,120); a.Println;
Writeln('S=',a.Skip(a.IndexMax).Sum)
end.
Пример
55 32 18 47 119 113 32 38 83 13 61 27 86 25 41
S=638
Не нашли ответ?
Похожие вопросы