===== PascalABC.NET =====
begin
var n := ReadInteger('Число элементов в массиве?');
var a := ArrRandom(n, 10, 50);
a.Println
end.
