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

0 голосов
68 просмотров

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


Информатика (32 баллов) | 68 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

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

(55.0k баллов)