С клавиатуры вводят 5 чисел. Вывести на экран модули отрицательных. Решить задачу на языке Паскаль.
// PascalABC.NET
begin
ReadSeqReal(5).Where(p -> p < 0).Select(p -> Abs(p)).Print
end.