Объяснение:
Какие числа ты не написал!?
===== PascalABC.NET =====
begin
ReadSeqInteger('Введи 3 числа:', 3) // вводим 3 числа
.Where(p -> p < 0) // пропускаем через фыильтр отрицательные
.Count // находим количество фильтр
.Println // выводим его.
end.
Объяснение:
Какие числа ты не написал!?
===== PascalABC.NET =====
begin
ReadSeqInteger('Введи 3 числа:', 3) // вводим 3 числа
.Where(p -> p < 0) // пропускаем через фыильтр отрицательные
.Count // находим количество фильтр
.Println // выводим его.
end.