Question

Написать программу, которая генерирует случайное число от 5 до 10. PascalABC

Answer 1

Ответ:

program z1;

begin

write ('Случайное число от 5 до 10: ',random(6)+5)

end.

Answer 2

Вот пример программы на PascalABC, которая генерирует случайное число от 5 до 10:

pascalCopy code
program RandomNumberGenerator;

uses
  SysUtils;

var
  RandomNumber: Integer;

begin
  Randomize;  // Инициализация генератора случайных чисел

  // Генерируем случайное число от 5 до 10
  RandomNumber := Random(6) + 5;

  writeln('Случайное число от 5 до 10: ', RandomNumber);

  Readln;
end.

Эта программа использует процедуру Randomize, чтобы инициализировать генератор случайных чисел, и функцию Random, чтобы получить случайное число в диапазоне от 0 до 5, к которому добавляется 5, чтобы получить число от 5 до 10. Результат выводится на экран с помощью writeln.