// PascalABC.NET
begin
var n := ReadInteger('Укажи количество элеменов:');
var a := ArrRandom(n, -7, 25);
a.Println
end.
