Вывести на экран 20 элементов массива, их сумму - вопрос №898679220 от dasha5334678 07.05.2021 08:24

Question

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

dasha5334678 · Answer

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