Помогите составить программу ** языке Паскаль. Дам 20 баллов

Question

Помогите составить программу на языке Паскаль. Дам 20 баллов

---

Comments

А номера причалов-то где?

---

наверное эти яхты нужно вогнать массив и их номер и будет номером причала

---

Наверное - это я так могу думать. А Вы должны сказать определенно.

---

Номера соответственны порядку в каком стоят числа

Answer 1

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var a := Arr(3.5, 4.2, 5.7, 6.3, 4.5, 7.1, 3.3);

 Writeln('a) ', a.Sum);

 Writeln('б) ', a.Where(t -> t > 5).Sum);

 Writeln('в) ', a.Max);

 Writeln('г) ', a.Where(t -> t < 5).Count);

 Writeln('д) ', a.IndexMin + 1)

end.

a) 34.6

б) 19.1

в) 7.1

г) 4

д) 7