Вывести ** экран 20 элементов массива, их сумму и номера элементов значения которых...

Question

Вывести на экран 20 элементов массива, их сумму и номера элементов значения которых меньше 0

Comments

какой язык?

---

паскаль

---

PascalABC.Net подойдет?

---

да

Answer 1

//PascalABC.NET версия 3.3.5.1636 от 10.03.18
//Если программа не запускается, то обновите версию
begin
    var a := ArrRandomInteger(20, -50, 50);
    Println(a);
    PrintLn('S = ', a.Sum);
    PrintLn('(x<0) = ', a.IndexesOf(x -> x < 0));
end.