Дан массив из 10 чисел промежуток от 1 до 10 вывести любое из этих чисел рандомно программа в паскале

//PascalABC.Net 3.1.0.1200
begin
    var a := ArrRandomInteger(10, 1, 10);
    writeln(A[Random(A.Length)]);
end.