Дан массив из 10 чисел от 1 до 10. вывести любое число рандомно

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