Задача. Массив А вводится с клавиатуры. Сформировать новый массив В , состоящий из...

Question

Задача. Массив А вводится с клавиатуры. Сформировать новый массив В , состоящий из положительных элементов массива А. Размер произвольный.

Comments

Если размер "произвольный", то нудно или условие окончания ввода, или первым числом вводить количество элементов.

---

*нужно

---

Написать программу? 

Answer 1

// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
  var n:=ReadInteger('n=');
  var a:=ReadArrInteger('->',n);
  var b:=a.Select(x->x>0);
  b.Println
end.