// PascalABC.NET

begin

 var n := ReadInteger('Укажи количество элеменов:');

 var a := ArrRandom(n, -7, 25);

 a.Println

end.