Question

Заполнить массив из 10 элементов случайными числами от -20 до 10. Вывести количество отрицательных элементов

Answer 1

PascalABC.NET 3.4.0, сборка 1675 от 12.06.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(10,-20,10); a.Println;
  Writeln('Отрицательных элементов: ',a.Where(t->t<0).Count)
end.

Пример
-8 -18 2 -7 9 -14 -2 -12 2 7
Отрицательных элементов: 6