Составить СВОЮ СОБСТВЕННУЮ программу на языке программирования Паскаль, которая бы использовала функцию RANDOM (X). Комментарии к программе ОБЯЗАТЕЛЬНЫ!
{
Программа генерирует случайное число от 1 до X. }
program RandomNumberGenerator;
var X, randomNumber: Integer;
begin // Запрашиваем у пользователя верхнюю границу для генерации случайного числа write('Введите верхнюю границу для генерации случайного числа: '); readln(X);
// Генерируем случайное число от 1 до X randomNumber := Random(X) + 1;
// Выводим результат на экран writeln('Случайное число от 1 до ', X, ' равно: ', randomNumber); end.
{ Программа генерирует случайное число от 1 до X.
}
program RandomNumberGenerator;
var
X, randomNumber: Integer;
begin
// Запрашиваем у пользователя верхнюю границу для генерации случайного числа
write('Введите верхнюю границу для генерации случайного числа: ');
readln(X);
// Генерируем случайное число от 1 до X
randomNumber := Random(X) + 1;
// Выводим результат на экран
writeln('Случайное число от 1 до ', X, ' равно: ', randomNumber);
end.