HELPPPP//HELLLPPP
Помогите написать программу в паскаль, пожалуйста.
В массиве A[1..6] найти сумму положительных элементов, найти сумму положительных элементов, которые которые находятся в диапазоне от -1 до 5 включительно.

Пожалуйста)

Как Вы понимаете, надеюсь) любые условия просто меняются внутри Where

спасибо за пояснение)

Тогда еще напишу, что в ArrRandom - количество элементов и границы изменения.

Массив сразу и создается нужного размера и типа, и заполняется.

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(6, -10, 10);

 a.Println;

 Writeln('Сумма положительных ', a.Where(t -> t > 0).Sum);

 Writeln('Сумма положительных на [-1;5] ',

   a.Where(t -> (t > 0) and t.InRange(-1, 5)).Sum);

end.

Пример3 -2 -2 7 3 6Сумма положительных 19Сумма положительных на [-1;5] 6