Срочно нужна ваша помощь!)) дан массив A[1..15], элементы массива - случайные числа,...

Question

Срочно нужна ваша помощь!)) дан массив A[1..15], элементы массива - случайные числа, принадлежащие промежутку [10;120], найти сумму чисел от максимального до последнего

Answer 1

// 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

Comments

Спасибо большое))