Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
PascalABC.NET 3.4.0, сборка 1675 от 12.06.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-20,10); a.Println;
Writeln('Отрицательных элементов: ',a.Where(t->t0).Count)
end.
Пример
-8 -18 2 -7 9 -14 -2 -12 2 7
Отрицательных элементов: 6