Question

35 баллов!Паскаль.Написать программу по которой из введённого массива А в массив В копируются только положительные элементы массива А.
9 класс.

Answer 1

// PascalABC.NET

begin

 var n := ReadInteger('Сколько элементов в массиве?');

 var a := ReadArrReal('Вводи:', n);

 var b := a.Where(p -> p > 0).ToArray;

 b.Print

end.