Напишите программу на паскале для вычисления произведение отрицательных. Количество введенных чисел неизвестно, 0 – признак окончания ввода чисел.

Можно попроще плиз

Непонятно мне

Можно Машку за ляшку, козу на возу, телегу с разбегу, а условие нужно ставить четко! Какое условие, такое и решение!

//PascalABC.NET//Версия 3.3, сборка 1611beginwrite(ReadSeqIntegerWhile(x->x<>0).Where(x->x<0).Aggregate(BigInteger(1),(x,y)->(x*y)));end.