Паскаль. даны три целых числа. найти количество отрицательных чисел в исходном наборе.

( 35 кто ответит)

Объяснение:

Какие числа ты не написал!?

===== PascalABC.NET =====

begin

 ReadSeqInteger('Введи 3 числа:', 3) // вводим 3 числа

   .Where(p -> p < 0)   // пропускаем через фыильтр отрицательные

   .Count    // находим количество фильтр

   .Println   // выводим его.

end.