Pascal Random - генератор случайных чисел на языке программирования Pascal

Pascal имеет встроенную функцию random для генерации случайных чисел в диапазоне от 0 до 1. Однако, чтобы получить случайное целое число из указанного диапазона, необходимо произвести определенные действия.

Для генерации случайного целого числа можно использовать следующий код:

Randomize; // инициализация генератора случайных чисел
random(Max - Min + 1) + Min;

Здесь мы сначала вызываем функцию randomize(), чтобы инициализировать генератор случайных чисел. Затем генерируем случайное число с помощью функции random (), указав диапазон с помощью формулы Max - Min + 1. Наконец, мы добавляем Min, чтобы получить число в нужном нам диапазоне.

Например, чтобы получить случайное число в диапазоне от 1 до 10, можно использовать следующий код:

Randomize;
random(10 - 1 + 1) + 1;

Также можно использовать функцию randomize(), чтобы получать разные последовательности случайных чисел при каждом запуске программы. Например:

program RandomExample;
var
  i, randomNum: integer;
begin
  Randomize;
 
  for i := 1 to 10 do
  begin
    randomNum := random(10 - 1 + 1) + 1;
    writeln(randomNum);
  end;
end.

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