Question

Напишите программу, которая осуществляет ввод целых чисел (ввод осуществляется
до тех пор, пока не будет введен ноль) и подсчет введенных отрицательных чисел
язык програмированния паскаль надо срочно!!!

Answer 1

// PascalABC.NET

begin

 ReadSeqIntegerWhile(p -> p <> 0).Count(p -> p < 0).Print

end.