Напишите программу, которая осуществляет ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен ноль) и подсчет введенных отрицательных чисел язык програмированния паскаль надо срочно!!!
// PascalABC.NET
begin
ReadSeqIntegerWhile(p -> p <> 0).Count(p -> p < 0).Print
end.