Предмет: Информатика, автор: alkhimik65

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


Aillianna: какой язык?
alkhimik65: паскаль
Aillianna: PascalABC.Net подойдет?
alkhimik65: да

Ответы

Автор ответа: Aillianna
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.
Похожие вопросы
Предмет: Қазақ тiлi, автор: Akbaaaar
Предмет: Физика, автор: Wweber100