Question

Паскаль АВС.net массивы !
Создайте массив А [1..8] с помощью генератора случайных чисел с элементами от -10 до +10 и выведите его на экран. Подсчитайте количество отрицательных элементов массива.

Answer 1

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

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

Пример
2 -6 3 -2 1 6 -1 9
Кол-во отрицательных: 3

Answer 2

Компилируется, не понимаю почему отмечали ошибочным.

Answer 3

типа покороче. ясно