Question

Напишите программу, которая выделяет в другой массив все элементы исходного массива, которые меньше нуля Входные данные Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива. Гарантируется, что 0 < N ≤ 10000 . Выходные данные Программа должна вывести содержимое полученного массива: все отрицательные элементы исходного массива в том же порядке. Если таких нет, нужно вывести число 0. Примеры Входные данные 6 1 -2 3 -4 5 -6 Выходные данные -2 -4 -6 Входные данные 6 1 2 3 4 5 6 Выходные данные 0

Answer 1

Ответ:

• begin
• var a := ReadArrInteger(ReadInteger);
• if a.Any(x -> x<0) then a.Where(x -> x<0).Print
• else Print(0)
• end.

Пример работы: