Есть ли функция, возвращающая случайное значение из множества integer? - PascalABC.NET
Формулировка задачи:
Есть ли функция, возвращающая случайное значение из множества integer?
Если нет, каков принцип написания такой подпрограммы?
Решение задачи: «Есть ли функция, возвращающая случайное значение из множества integer?»
textual
Листинг программы
const z:array[0..1] of integer=(-1,1); var x:integer; begin randomize; x:=random(maxint)*z[random(2)]; write(x); end.
Объяснение кода листинга программы
- Объявляется константа
z
типа массив из 2 элементов типа integer. - Инициализируется переменная
x
типом integer. - Выполняется процедура
randomize
, которая инициализирует генератор случайных чисел. - Вычисляется выражение
random(maxint)
, которое возвращает случайное число в диапазоне от 0 доmaxint
. - Результат умножается на значение, полученное из массива
z
по случайному индексу в диапазоне от 0 до 1. - Полученное значение записывается в переменную
x
. - Выводится значение переменной
x
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д