// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var A:=ArrRandom(ReadInteger(n=),-99,99); A.Println;
var Б:=A.Select(x->x
Пример
n= 15
11 -39 -30 -40 97 12 51 91 29 -52 2 27 -81 20 9
11 -78 -60 -80 97 12 51 91 29 -104 4 27 -162 20 18
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.