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

Question

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

Answer 1

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