Question

программа для выдачи рандомных чисел от 1 до 10

Answer 1

begin
    writeln(Random(10) + 1);
end.